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HSTPACT 

1Cl«2/15 HASIC EXEhCiScW >^ArtT i iS a St-^iEvS OF resr Hk.jGKAf"? 
THAI MAY fE U5EL) 10 SAlN 4 rtliiH UtGWEt OF C ONF lOE'^ti: 1^ T-.fc 
OATa HANOLlfv'j AdlLllY 0^ A Tt:i'>?/13 UECI APfe CUNlKUU ANj «^Y 
CONFTbUt'AllOV OF 1 IC S Tu!5^/56 DtCrAPt T « *.N.SHi..f' T .s . 

TMfe RASIC EXEKClStK CONSISTS Of StVL-^AL HiAfeiC HbU^I^E3 ImaT 

MAY BE INUIVIOUALLY StUt-CIEO. iMt iNSTHgCtlOw (feSt OPcHATti* 

DRIVE «/i^ ONLY, AND RtGLl'<ES THAI OHlvE 6/1' hfc OK tl^'t AMj ►trlli 
ENASLED, 

TMt ROUTINES AKE: 

RUUIINE 1. tCH2/Jt> INSTRUCTJOK 7E5I 

ROUTINE 2, TCv12/J5 Afl TtSi 

8, KEQUIHEHENTS 



2.1 EUUIPMENT 



PDP-15 

TCB2/15 DECTAPE CONTROL 

1 TO 8 TU5SA36 OECTAPE TRANSPORTS 

API COPTIONAL) 



2.2 STORAGE 



THE PROGRAM OCCUPIES CORE MEMORY UP Tu AOURESS 2S0B, 
2.3 PRELIMINARY PROGRAMS 



ALL PDP-1& CENTRAL PROCESSOR MAINOEC IJlAGNOSUCS SHOULD RiJn 
SUCCESSFULLY BEFORE ATTEMPTING 10 RUN THIS PROGRAM, 

3. LOADING PROCEDURE 



PLACE TmE binary Take I^ ME REAOtR 
SET THE ADDRESS SwITCmES TU l77i*H 
SET THE BANK MOOE SwITCh TO A 1 
PRESS I/O RESET 
PRESS READ IN 
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4, STARTING PHOCeOURfe 

4.1 CUNTHOJ. S»iITCH SETTINGS 



THE PARTICULAR HOoTINfc TP SE «uN IS StUtCffcO rfT Pl.«CIivif. 1nfe 
NUMBER Of THE ROUlIwE In aC S-ITCm KfUIiTfek pITS jft AnD i;. 



AC 16-17 


ROUTINE 

NO TEST 

Tta2/15 INSTRUCTION TEST 

TC08/15 AHI TEST 

NCI TEST 

ADDRESS 


READ SECTION 


Pll 

10 

11 

STARTING 


7. J 
7.2 



4.2 

200 
4,3 PROGRAM ANO/OR OPERATOR ACTION 

A. SET THE ADDRESS SMITCNES TO 200 

B. SELECT THE ROUTINE TO BE Run VIA AC ShITCHES 16-17 

C. PRESS I/O RESET 
0. PRESS START 

5, OPERATING PROCEDURE 
8.1 OPERATIONAL SWITCH SETTINGS 
AC SWITCH FUNCTION 



0«0 Enable tty messages 

0»1 delete tty messages 

READ EACH OF THE INDIVIDUAL TEST DESCHIPTIOns TO DETERMINE IF 
ANY OTHER SWITCH SETTINGS APPLY TO THAT PARTICULAR ROUTINE. 
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5,1.1 TfeST HOUTlK'tS AND 4HPI.ICABLE «UN SWITCHES 



TEST ROUTINE 



AC 5w 



FyKCTION 



TCia2/J5 INSTRUCTION TtST 



TCB2/15 API TEST 
S.2 SUBROUTINE ABSTRACTS 



«=1 HAtT A I E.NU OF NOn- 

MOTiUN lEbTjj (IF rAPc 
MOTION HAS Upf ottN 

TkSTEt), KOUTlNt IF>A«T 1) 
SHCUtO BE oTlUItED bEFOKE 
ATTEMPTING TAPE MOTION 
PORTION OF THE INSTKUC- 
TltiN TeST.J 

9*1 HALT AT fc^O OF 1EST. 



5.3 



N/A 



PROGRAM AND/OR OPtHATQR PROCEDURE 



THIS SERIES OF ROUTINES IS DESIGNED FOR INITIAL CHECKOUT OF A 
TCBa/15 OECTAPe CONTROL AND ITS ASSOCIATED DRIVES, OR MAINTENANCE 
AND REPAIR OF THE CONTROL AND DRIVES AFTER INSTALLATION. 

THE FOLLOWING PROCEDURE COULD 8£ USED FOR INITIAL CHECKOUT OF 
I^L'^9'^^''°'- *^° DRIVES, AND TO AID IN THE REPAIR UF HALFUNCTIONS 
ONCE THE CONTROL AND DRIVES HAVE BEEN OPERATING. 

S.3.1 OPERATION CHECK 



THE FIRST ROUTINE UtiLIZEO IS THE TC02/I5 INSTRUCTION TEST. IT IS 
U5E0 TO VERIFY CONTROL OPfeRATIONS, 6«.i, x. io 
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5,3.1,1 INITIAL COtHTRQL STATE 



(•MEN POWfe-K IS iMiriALLY APPLIED TO THE TCl*2/lS CONTHOL. STATUS A, 
THE EKROW AK'D OECTAPE FLAfaS, AND TMfe i/ATA fLAG CAN COmE L'P IN 
ANY STATE, A ShaHT MANUAL PROCEDUKE WILL PSEV£NT fc«A5IN& 
OECT*PES AND HAVING TO WEuUAO P«OGi*A«<S, 

PKESS I/O KtSfcT 

NOW EXAMINE THE TC»2/15 iNOICATOft PANEL, fHE »=OLLO»«ING INOICATLHS 
SHOULD ALL BE OFF, INOICAIInG A f. STATE, 

OTF COECTAPE FLAG) 

OF {DATA FLAG} 

ALL EHROR FLAGS 

W (KREK WRITE ENABLE) 

STATUS A BIT 4 (MOTION) 

US (UP TO SPEED) 

C«l TO C2 CAN BE IN ANY STABLE STATE (NOT COUNTING) 

ALL STATE REGISTER HITS EXCEPT 1 SHOULD BE H, ANO 

BIT 1 SHOULD HE A 1 (STATE IDLE) 



5,3.1.2 TCe2/19 CONTROL TEST 



THE FIRST HALF OF THE TC02/15 INSTRUCTION TEST VERIFIES THE 
EXISTENCE OF ALL OECTAPE lOTS EXCEPT DTOF (SKIP IF OTF»l), 
ANO ALSO VERIFIES THAT THE STATUS A REGISTER BITS FUNCTION 
PROPERLY AND WILL HOLD ALL COMBINATIONS OF DATA. 

SET THE ADDRESS SWITCHES TO 200 

SET THE AC SWITCHES TO 10(31 

PRESS I/O RESET 

SET DRIVE 6/0 ON LINE ANO WRITE ENABLED 

PRESS START 

THE PROGRAM TESTS AND VERIFIES ALL CONTROLS FUNCTIONS THAT 00 
NOT REQUIRE TAPE MOTION, ANO HALTS AT AOURESS &22, 

A HALT AT ANY OTHER ADDRESS INDICATES A CONTROL ERROR. CONSULT 
THE PROGRAM LISTING FOR THE ERROR DEFINITION, 
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tt).3.l.2 TCJ»2/15 CONTKOt TEST CONTlNUtO} 

AT THIS POlNTi IF TAPt MOTION MAS Ai.><tAUY PbgN DfcHNEO. ANU If 
IS NOT A "RAW" CONThOU THAT IS tthlNU IKSTtU: 

SfcT OKIVf. 8/'^ ON Ll^E ANti "Urtllt tNAt-iLtO 
P«ESS CONTINUt 

THE PROGKAM WILL vEkIFY ThE FUNCTIONAL uPthATIUNS OF rut TC02/n 
CONTROL FOR ALL OtCTAPE OPEHAllUNb tXUEPT wHTM, TYPtOoT "tNij" On 
THE TTY AND HALT AT A0Dft€55 1361, 

A HALT AT ANY OTHER AUDKESS iNOICATtS A CONTROL ERROR. CONSULT 
THE PROGRAM LISTING FOR THE ERROR DEFINITION, 

5.3.2 CHECK API OPTION 



RUN TEST ROUTINE 2 TO VERIFY THAT THE API WORKS IN A STATIC 
CONDITION. ONCE TEST 2 RUNS IN ITS ENTIRETY, ROUTINES c, 5, 6, 
AND 7 (PART 1), SHOULD BE RUN WITH THE API OPTTON SELECTED 
(AC SWITCH I2al AT START FROM ZUBJ, 

AFTER ONE PASS THROOGM THE API TEST ROUTINE 2, THE PROGRAM wIlL 
TYPE "API END", IF AC SWITCH 8»l THE PROGRAM WILL REPEAT, IF AC 
SWITCH 8«0 THE PROGRAM WILL HALT, 



6. ERRORS 



NEITHER THE TC02/J5 INSTRUCTION TEST OR THE TC02/16 API TEST HAVE 
ERROR TYPEOUTS AND ALL HARDWARE MALFUNCTIONS DETECTED RESULT 
IN A PROCESSOR HALT AT A SPECIFIC ADDRESS, 

7, PROGRAM DESCRIPTION 

7,1 TC02/15 INSTRUCTION TEST (ROUTINE 1) 



THE TC02/15 INSTRUCTION TEST IS SEGMENTED INTO TWO MAJOR DIVISIONS: 

A. THOSE FUNCTIONAL OPERATIONS THAT CAN BE TESTED WITHOUT 
TAPE MOTION, 

B. THOSE FUNCTIONS THAT CAN ONLY BE TESTED UTILIZING TAPE 
MOTION. 

IF AC SWITCH B«l, THE PROCESSOR wlLL HALT AFTER COMPLETION OF 
THE NON-MOTION TESTS AND BEFORE PROCEEDING TO THE TESTS THAT 
REQUIRE TAPE MOTION, 

BOTH SERIES OF TESTS REiiUiRE DRIVE 8/id TO BE ON LiNE ANU wftlTE 
ENABLED, AND 00 NUT USE ANY OTHER DRIVES, 
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17,1 TC82/15 INSTRUCTIOM TEST (HOUTIIME I) CONIINUtD] 

THE CONTROL *N0 NO TAPE MOTION f'OKTiON OF THE TESTS TfST THE 
PERFOHHAhCE Of THE fOtLO-lNGJ 

I/O «EStT CkEAKS ALL TCi»2/lt) HLAo!) 
EXISTENCE 01= AtL DECTAPt lOIS EkCfcPI OfSF 
BIT ANO DATA TEST ON UECTAPt i>TATyS A 
I0P5 »ir ia«B NITM ALL OECTAPt FLAGS«w 
FR l-d«7 JO GtMERATE A SELECT EHHUfc 

xsa Out to at not greater than sus 

SELECT ERKOR TO GENERATE ERROW FLAG 

lORS dIT li»*l I^ tF«l 

OTEF TO SKIP IF £F IS A 1 

DTDF TO NOT SKIP IF EF IS A I 

NO PROGRAM INTERRUPT WITH EF»1 ANO ENI»^ 

OTXA -irH AC flIT I0»1 INHIBITS CLEARING EF 

OTXA mlTH AC BIT IflaP! DOES CLEAR EF 

SE GOING TO I CeNERATES ERR STP ANO STATUS A BIT 4 IS 

CLEARED ay ERR STP 
EF ANO STATUS A BIT 9 CENI) ON A 1 ALLOW PROGRAM 

INTERRUPT 
DOES CAF GENERATE I/O POWER CLEAR ANO CLR EF 

THE TAPE HOTION TESTS VERIFY THE PERFORMANCE OF THE FOLLOWING 
FIRST TEST MOVE FUNCTION 

MOVE TAPE BACKWARDS 

DOES DATA BREAK NOT OCCUR IN MOVE 

WILL EZ BE DETECTED 

DOES EZ GENERATE EF 

DOES EZ GENERATE ERR STP ANO CLEAR TAPf MOTION 

(STATUS A BIT 4) 
OTXA WITH BIT 10»() SHOULD CLEAR EZ 
CAF SMOULU CLEAR tZ 
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t7.l TCa2/15 INSTkUCTlOfJ TEST (KOUTlNE 1) CONTINUED) 



SECOND TEST wKlTE *UL (BACKhAHOS) 



DOES w«ITt ALL NOT CAUSE 5>t 

*>ILL *HITE ALU CAUSE A OAIA BhtAK liJHOuU'J (.fc f 
LEAST 9 TPO'S ^EFUKE tl. AT LEAST OnE 

thEm should Cause tr to ob.j 

IS «iC LOCATION *l AI QA1A B«EAH 

IS CA LOCATION +1 AT UATA BREAK IN wklTE ALL 

»ilLL OELTAPE FLAG CDTF) SET AT wRUE ALL DATA 

BKEAK 
15 WRITE ALL TRANSFER OIRECFIDN OUT AnO NOT In 
WILL OTXA NITM AC BIT 11«1 NOT CLtA« QTf 
DOES 0TF»1 «AKE lORS ttIT lie A 1 
WILL 0TF«1 ANO ENI«l (STATUS A BIT 9) AuLOw 

PROGRAM INTERRUPT 
WILL UTF»I ANO ENI»B NOT ALLOW PROGRAM 

PROGRAM INTERRUPT 
WILL OTOF SKIP KITH DTF»l 
WILL OTEF NOT SKIP WITH 0TF»1 AND EF»i? 
CAF SH0U1.0 CLEAR THE OTF 



A r 
0^ 



THIRD TEST 



READ ALL (FORWARD) 



WILL DATA BREAK OCCUR IN READ ALL 

DOES CA LOCATION INCREMENT IN READ ALL 

WILL 1 TO OTF SET TIM WITH DTF ALREADY EQUAL TO 

DOES TIM SET EF LEVEL 

DOES TIM GENERATE ERR STP AND CLEAR MOTION 

OTXA WITH BIT 10«1 SHOULD CLEAR OTF SOT NOT 

TIM 
CAF SHOULD CLEAR TIM 



FOURTH TEST 



READ ALL C MODE 



DOES READ ALL C MODE ALLOW DATA BREAK 
OTF DOES NOT SET AT WCO IN C MODE 
DTF DOES SET AT WCO (WORD COUNT OVERFLOW) 
WCwe SHOULO NOT ALLOM ANY MORE DATA BREAKS 
CAF SHOULD CLEAR TAPE MOTION 
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17. I TCtJg/lS INSTRUCTION TEST (hOUTlN£ l) CONllNUfeOl 



FIFTH TfeST 



SiARCH NOKMAL MOOfc 



SIXTH TEST 



SEVENTH TEST 



EIGHTH TEST 



r>t!£i» SEARCH AULOi* OaTa 6RtA«, 

OOfS i>TF«i AFIfcK A SEa^CH OATA BftcAK 

CA LOCATION SHOULO NOI INCt'feMfetvT iN SEAt^CH 

TKAKSFEK OIRECTION OF OATA SrtOOLD BE INPUT 

SfeAKCH C MODE 



DOES SEARCH C HOOt ALLOHf OAtA b»EAK 

DOES OTP MOT SET TO 1 WITHOUT hCO l\ C MODE 

DOES OTF SET TO I AT SEARCH C MOOc ANO -CO 

READ OATA NORMAL MODE 



DOES READ DATA NOT ALLOW DATA BREAKS UNTIL 

STATE DATA 
WHILE IN STATE DATA DO OATA BREAKS OCCUR EVERY 

ZbOMS (APPROXIMATELY) 
DOES STATE CHECK GOING TO SET 1 TO OTF 

READ DATA C MODE 



DOES READ DATA ALLOW 2S6 OATA BREAKS PER fltOCK 
STATE CHECK GOING TO Z SHOULD NOT SET 1 TO DTf 

IF «C»» 
WCO (WORD COUNT OVERFLOW) BY ITSELF SHOOLO NOT 

SET I TO DTF 
STATE CHECK GOING TO (9, NCB AND READ DATA 

C MODE SHOULD SET I TO OTF 
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(7,1 TC02/15 INSTRUCTION TEST (HOUTlNE I) CONTINUED! 
NINTH TEST HKITE DATA NOKM*L MODE 



WKITE DATA SHOULD NOT ALLOW DATA I3REAK5 UNTIL 

STATE REVERSE CHECK 
ONE DAT* bREAK SHOULD OCCUR DURINt STATE SEVEHSt 

CHECK 
DATA BREAKS SHOULD OCCUR APPROXIMATELY EVERY 

2(«0MS IN STATE DATA 
DOES WREN GO TO A 1 AT STATE DATA (NO DATA 

BREAKS IF IT DOESN'T) 
WHITE DATA SHOULD NOT ALLOW DATA BREAKS DURING 

STATE FINAL 
WRITE DATA SHOULD NOT ALLO* DATA BREAKS DURING 

STATE CHECK 
WRITE DATA NORMAL MODE *ND STATE CHECK GOING TO 

9 SHOULD SET 1 TO OTF 
WREN SHOULD GO TO i DURING STATE IDLE AnO NOT 

ALLOW ANY MORE DATA BREAKS 
AGAIN TEST WRITE DATA TO ALLUi* I DATA BREAK 

AT STATE REVERSE CHECK 
WREN SHOULD NOT GO TO A 1 AT STATE DATA IF DTF 

IS ALREADY A 1 
DTXA, WRITE DATA AND NOT STATE IDLE OR STATE 

BLOCK MARK SHOULD CAUSE A TIMING ERROR 
TIMING ERROR SHOULD CLEAR US VIA ERR STOP WHICH 

IN TURN CLEARS REGISTER TO IDLE, ANOTHEw 

DTXA AND WRITE DATA SHOULO NOT CAUSE A 

SECOND TIMING ERROR 



TENTH TEST WRITE OAT* C MODE 



TEST ONLY 256 DATA BREAKS PER BLOCK WRITE DATA 
STATE CHECK GOING TO SHOULD NUT SET 1 TO OTF 

IF WC»l (NO WCO) 
STATE CHECK GOING TO U SHOULD SET 1 TO OTF IF 

WC«0 (AFTER WCO) 
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7,2 TC82/15 API TEST (ROUTlNt 2) 

THE TC02/15 API TtST IS A STATIC TEST OF THE TC02/15 INTEBSUPTS ViA 
TNE 4PI AND ShOULO WUM IN ITS ENTliikTY SEfC-KE AITtMPTIOiS TO 
eXEHClSfe THE OTHEH TEST ROUTINE UTIUIZIN6 Tri£ API (AC S«nc« 
I2«l AT 5TAKT fHOt" 2?iK»). 

INITIALLY, THE API TEST LOADS AUOKESSfeS ia TO /? *1TH a St«IES 
OF LAK'S (i0«LAw in TO /7SLAW 7/), AFTER EACH OtCTAPE API BKtAK 
THE AC SHOULO EQUAL LAW 4«, AC SWITCH 830 IS HALT AT £N0 OF TEST. 
AC SXITCH 8.1 IS REPEAT API TEST, 

THE SEQUENCE OF TESTS MADt ARE AS FOLLOWS: 

*ITh all OECTAPt FLAGS EGiUAU TO P API 5H0OL0 »^0I BREAK 

KITH EF«l AND API OFF SHOULD NOT d*(£At< 

API ON AND EF81 SHOULO BREAK TO AODRESS AA 

D8K AND NEW Ef-nl SHOULD BKEaK TO ADDRESS 44 

API OFF AND OBK WITH NEW EF«1 SHOULD NOT ALLOW BREAK 

OECTAPE SHOULD NOT BREAK WITH PRIORITY ts ACTIVE 

OeK FHOH PRIORITY ACTIVE SHOULD ALLOK BREAK TO ADDRESS 

44 
API REQUEST ON PRIORITY 7 SHOULD NOT INTERFERE i»ITH 

OECTAPE API REQUEST 
API ON-APl OFF SHOULD NOT ALLOW A BREAK 
API ON-APl OFF SHOULO NOT CAUSE OECTAPE API REQUEST 

TO BE LAST 
DBK-API OFF SHOULO NOT ALLOW API BREAK 

OBK-API OFF SHOULD NOT CAUSE OECTAPE REQUEST TO BE LAST 
API SHOULD HAVE PRIORITY OVER PR06RAM INTERRUPT 
OBK SHOULO ALLOW SECOND BREAK FROM SAHE EF AND PIE 

SHOULO NOT OCCUR 
IF ENI«a tOECTAPE STATUS A BIT 9) AND EF»l 

NO API BREAK SHOULD OCCUR 
OECTAPE FLAG«1 AND ENI-1 AND API ON SHOULO BREAK TO 

ADDRESS 44 
OECTAPE FLAGwl AND API ON SHOULD OVERRIDE PROGRAM 

INTERRUPT TO ADDRESS « 

8. PROGRAM LISTING 
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TCBXP2 S«C 



* MAINDEC-15-UATCA-A * HAKCH 17, 1972 • 



9iif929 
9»929 

e««i2l 

90022 
0d023 
(110924 
BtfB29 
00026 
C» 10027 



767541 
7«?7542 
707544 
7P7545 
7P7661 
7«7562 
7l«7bPl 

(K2ie«ie 

(1161000 
«960000 
$122000 

A0500e 

003000 

l»20000 
040000 

ift»ce0 

flie«00 

1820000 
000100 
000400 
775000 
777400 
000030 
W0«ft31 
fl»640e 
007000 
000300 
006377 
007400 
79C004 
700044 
70030 1 
700402 
700406 
7C0401 



00002(3 
700304 
700301 
741000 

74011141^ 
7(30042 

62S'e2«i 



.TITLE * MAlNttEC-15-OATCA-A ♦ Mi«CH 17, 1572 . 

.A«S 
/TC(«2 BASIC EXERClStK POP-IS - PAKT2 

/LOPVhIUhT 1972, UlbllAu EOOIPMENf COkP., lay.'.Ano, ^4S^. 
/fcOUATk UtCTAPE lOT'S 
0ICA«/e7541 
OT«A»707542 
01XA«7e7544 
OTlA»PTCA|OTXA 
OTfcF»/075bl 
OTI*B»707S62 
OTOI^ ■7076(91 

/EQUATE OECTaPE FUNCTIONS (STAT AJ 
SKChFws2tia0fa 
SNCHBM*61000 
MOVBK»«*60i«0e 
ROAT«Ft22000 
V)KALL*500«> 
ROALL'3000 

/eiT CONSTANTS EUUATEU 
GO{)n«200e0 
DIRdIT«40000 
EZBIT«100000 
MOOEBT •10^00 
PARBIT'20000 
OTFliITal00 
ENABLI>400 

BLKTIMBLAW >3000 /ABOUT 36 MSEC 
BLENTH«t.AN >4a« /-2a6 FOR BLOCK WC -400 OCTAL 



■ ]7i>i. 



MCLOCa30 

CALOOS} 

BUFFER-6400 

BUFF«2«BUFFER*400 

Il«HCLR«3Be 

8LKFN0«BUfFER-t 

BUFFR3*BUFFft2<»40e 

CLOFB7008e4 

CLONa70Be44 

KSF*700301 

TCFS708402 

TLS>70«406 

T»F«70040t 

/ 

/IN CASE OF CAL 

,LOC 20 

Ski 

IORS-10 

KSF 

SKP 

HLT 

ION 

PttH 

JMP* 20 



/MORD COUNT 
/CURRENT ADDRESS 
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.tJECT 
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TCBXPa sue 



• HAINDEC-1&-DATCA-A • MAhCH 17, l9/2 • 



00201 
»t!i2iJ2 
0v)203 
9999* 
0820S 

ee2ia6 

00207 
00210 
("0211 
00212 
00213 
00214 

00230 
0023V 
00231 



750004 
502300 
3423(51 
9)«0206 
202302 
9140001 
620211 
740040 
600200 
000207 
000232 
001563 
5100207 
000215 

000000 
000000 



/5T««TlNG ADOi<tSS IS> 1^015 

/StT S»i KtG S>*16 TO SW17 SEUECT TfeST 

/«1 IS 1C02 1NSTKUC1I0N TEST UStS HhilvE 

/s 2 IS tPl TEST 

/S-ITCH ri IS JfcUfcTE ALL TrHfcDUtS 

/SELECT TtSTS StTuP FUR 

/HhiST CilVt «J TO OfflVE TABLES 



(5 -^ L * 



20V4 



Ttv»?T5 



GOTST 



TSTTBU 



MDTT8t», 

M»81TS 
UNFUWC 



.loc 

LAS 

AnU 

TAO 

DAC 

LAC 

DAC 

JilP* 

NLT 

JMP TC02TS 

G0T5T*! 

IN5TST 

APITST 

GOTST+l 



(JMP* 
GOTST 
(JMP* 2 
1 

ISTTBL 



TST18L 



/LtC ChANGt To ♦ lEST M.'Mpi:« 



,LOC TSTTbL*17 





.£JECT 
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TCBXP? SrtC 



« M*lN0ec-l5-UAICA-A • HARCH l7, 19/g • 



/KAHT I VfeRIFIES STaT 3 

/IS CLCAKtO BY I/U i<tJ>5l AT SlAKT 

/PAKT ? *tfcOtllt<£D UrtlVfc B ON-(.lNt *hn£ £h 



eiA^42 


76l7b7? 


m2i3 


74£»<l>lr' 


t^i)2.}4 


74Bi,i<li' 


0»245 


7?i^3M 


0ia2J6 


5023t»J 


<(tiS237 


74«?*it« 


00240 


74a#'4((> 


00241 


750«H*i 


014242 


707601 


ei82A3 


7*8V«!l 


014244 


741200 


00245 


740040 


019246 


750000 


00247 


707561 


002S0 


740001 


002S1 


741200 


00252 


740040 


00253 


202304 


00254 


040001 


00255 


790000 


00296 


700042 


00257 


740000 


00260 


700002 


00261 


740001 


00262 


741200 


00263 


740040 


00264 


750000 


0id26S 


7e7S4l 


iff«266 


7(«7552 


00267 


740200 


0K27« 


740B4g 



INSrST 


OlSH+liA 


/A^t FLAGS 




S/A 


/ShUOULf lit CLtAK 


I\€KW1 


+1LT 


/(JL.l Afct ^Ot 


/ALSO - 


loKs - ttn 


1«4 SHOuLO > ^ 




lOKS 


/KfeAO STAfUS 




AMU xa«)i<9 


/•-.ASK 6iT 




SZA 


/ShOl'CU B <! 


iNenvig 


HLT 


/10«i ^AltfeL) 



10 



/SKIP ON UECTAPt ►iAG S+iOuLO NOT bMP 
t:iA 

tnOF /SHOUUO NOT SKIP 

C«A /0T# ■ » 

SMA /S«OUt.O HAV£ £XC CMA 

INEKB3 HLT /AC ■ IS SKIP tHKOK 

/ 

/ 

/SKIP ON fcHHOR FtAG ShOutl) MOT SKIP 
CUA 

OTEF /ShOUUO NOT SKIP tf • ^ 

CMA /SHOUUD EXecUTe CMA 

SNA /Olt) IT 

INEK04 HLT /NO AC « .« IS SKIP EkHOM 

/ 

/PtJOGRAM IMTEH«UPT SHOULD NOT 

/OCCUR ALL OECTAPE FLAGS > id 

LAC {JMP INERB5-1 /INT JMP 

OAC 1 

CLA /MAKE FOR TEST 

ION /EWBiE 

NOP /SHOULO NOT BREAK 

lOF /SHOOLO EXECUTE 

CMA /8>t0UL0 EXECUTE 

SNA /AC • U INT 

INER05 HLT /INTERRuPTtO IN ERROR 

/ 

/STATUS A CLEAR AND READ 0*5 
CLA 

OTCA /bhOULO CLEAR STAT A 

OTHA+10 /SHUULO RtAO (n ' S 

S2A /AC NU1 a Id IS tRKOR 

INERee HLT /CLtAR STAT A Ok Kt«0 fc^ROR 
.EJECT 
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TCBXP2 SrtC 



* MAlNDfcC-l5-l)ATCA-A * MAHCH 17, 19/2 • 



P«272 

Z^27A 
Pi}275 
P«276 
0«277 



750«K» 
7t»7541 
777777 
74«7S<4 
75(« »«*»((! 
707S42 
74i20t6 
740040 



00301 


90230!) 


(!03a2 


C!l4«ei0 


0(SM3 


777777 


00304 


!M«et7 


00305 


7see«0 


003«# 


7Wm4l 


0030? 


TWrsag 


00310 


sterie 


00311 


740200 


00312 


740040 



00313 


20««t0 


00314 


r0;fS44 


00315 


7«7552 


08316 


500010 


00317 


240010 


00320 


740*00 


00321 


740040 


00322 


440017 


00323 


741000 


09324 


60030:] 



/iet l¥ ANY STATUS A 
/AND KtAD »AC« TO AC 

CUA 

DTCA 

LAW -i 

OTXA 

CLA 

niHA 

SNA 
lNtK07 HLT 
/ 
/ 

/STATUS A BIT TESTS 
/HKST BIT TEST DOES 
/UO ALL TfeSTS Ft)H 
/ST AWT WITH BIT 9 
SABTSr LAC (4»t» 

OAC 10 
/ 
/BIT CLEAR TEST 

LAW -I 

DAC 17 

CLA 

BTCA 

0TRA+10 

AND 10 

SZA 

HLT 



t5lTS 

(ANY 



SET 10 I 
AT ALL) 



/CLtAH STAT A 

/SHOULD HtAU A f'few J ';> 

/ShOULP R£AO A FEi^ I '5 
/AKYTHING BUT ALL W 0'* 
/eiTHEH 010 NOT SET 0» hEAO 



IT CLEAM 
1 SIT THEi-J RPT 
AND GO 1C BIT » 



SAER00 

/ 

/NO* TEST THAT THE BIT WILL SET 

/TO A 1 TH€N LOOP BACK AND TEST 

/BIT SET TEST MILL IT GO TO « 1 

/AND READ BACK AS A 1 

/ 



/2ND PASS Switch 

/CLEEAR STAT A 

/READ A 

/MASK BIT 

/IS IT 

/NO DISPLAY FAILED BIT 



CLEAR AGAIN 



SAER01 



LAC 10 






DTXA 


/BIT SHOULD SET 


TO 1 


DfRA*10 


/AND READ TO AC 




AND 10 


/BIT SHOULD ■ 1 




XUR in 


/NOW StIOULO * 




S2A 






HLT 


/DISPLAY FAILED 


BIT 


rsz 17 


/2N0 PASS CLEAR 


AND SET 


SKP 


/YES 




JWP SABTST+4 






•EJECT 
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/NQKi TeST «*rLL THfc dIT 60 1 TO » 
/flHS} CLtAW SET TO 1 CUHP fO H 



«4ld325 


75«V!f H 


<*w326 


7H7J>«1 


PtM327 


2?l(»iilJ9 


i<ia3dei 


7«'7544 


ejsait 


7H7S44 


0^342 


7075^2 


vmSii 


5n««ie 


e«93i4 


749»im 


00345 


74!**' 4« 



0(9336 


73(9000 


00337 


707541 


00340 


200010 


00341 


740001 


00342 


707544 


00343 


707552 


00344 


900010 


00345 


740200 


00346 


740040 



00347 


750000 


00350 


707641 


«03S1 


200010 


00352 


542306 


003S3 


600364 


00354 


707544 


00355 


740001 


00356 


707544 


00357 


707552 


00360 


500010 


00361 


240010 


00362 


740200 


00363 


740040 


00364 


200010 


00365 


744kili?, 


00366 


74lfl2M 


0id367 


6Sl03l!!8 



SAtH02 
/ 

7N0t» TEST 



Ct.A 
OTCA 
LAC M 
Dl XA 
UrXA 
0?«A*lid 
ANO IM 
SZA 
HtT 



ZtLtAK A 

/Sfcr BIT to 1 
/iHOULO WAKt IT 
/*K0 HtAO «: 

/tiJT GO Tu /> 
/01S*'U»t KAILEl) 



BIT 



/TO 
/ 



•IIUL 1«fc 6n NOT GO 



A I mm THt AC 81T 



SAERe3 

/ 
/ 

/NOH TEST 
/REMAIN A 
/ 



CCA 
DTC« 
tAC 10 
CMA 
OTXA 
UTRA4>1^ 
AND 10 
52 A 
HUT 



WILU TH£ SIT 
I WITH THE AC 



SAEt(04 
/ 



CUA 

OTCA 

LAC 10 

SAO (020000 

JNP SAER04*1 

OTXA 

CMA 

OTXA 

OTRA*10 

AND 10 

XOR 10 

S2A 

HLT 

LAC 10 

CULIBAL 

Sik 

JMP SA9TST+1 

.tJECT 



/CLtAR ALL 

/MA*e AC bit a a 
/5TATA bIT SHOULD STAT e 
/«FAO IT 
/HASK IT 

/ttiT Should be <e 

/DISPLAY BAILED BIT 



BIT 



/CLEAR STAT A 



/CAN NOT 00 
/MAKE BIT ■ 



BIT 
I 



/SHOULD NOT CMANGt IT TO (^ 

/READ STAT A 

/MASK BIT SHOULO • 1 

/xoR Should go to 

/DISPLAY ttIT THAT DID NOT StAV I 

/FOR NEXT eiT 
/POSITION 
•DONE ALL BITS 

/NO 
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Vi»l376! 


1 4{»HllP 


P'l/.a/i 


20PIH1** 


8«372 


5iZ23e7 


PI0373 


(^4(?H1 1 


Pit*374 


7M7545 


00375 


7v?7552 


?iv5376 


54C<0n 


PH377 


6k?l?i403 


1^)4401^ 


74?B40 


Ii!t«4(/ll 


29'BBll 


CIH402 


7409411* 


(;0403 


2(4(teiei 


H0404 


34S305 


fgl405 


t)i4i9eie 


P0406 


749l2eid 


8I04H7 


8II<(||371 



00410 
00411 
00412 
00413 



703302 
707572 

740200 
740040 



00414 


202310 


00415 


707545 


00416 


S00417 


00417 


600420 


00420 


600421 


00421 


600422 


00422 


707572 


00423 


242311 


00424 


740200 


00425 


7400dvl 



/STATUS A DATA TfbT 
/i«ILL STAT A HOLD ALL 
/LOMBiNATIOMS exCePl tin 

/ 



S«OAl A 



LAC 

AM) 
DAC 
DTLA 
DIRA+10 
SAD 1 1 



M 
1/-. 
( ; b 7 4 !/> / 

11 



MPA^E 



SAE»*06 



JHP 
HLT 
LAC 
HLT 
UAC 
TAO 
OAC 
S2A 

jmp 



.♦4 
It 

10 

(401;? 
SAOaTa+1 



/btT UAIA 
/liAsK blT 
/SAVt fO^ 
/LOAt) A 
/KtAU A 

/CC«*<fcCT RfcSDuT 
/YES 

/OIS^^LAY 
/OISPLAY 



COhilvECT SA 



/uoKe 

/NO 



/DATA INCREMENT 



ALL COMfcilNAr IONS 



/ 
/ 

/NO* TE&T 

/A UITTLf 

/ 

/f IRST 

/CLEAR 

/ 

SBTEST 



STAT b OPERATION 
FARTHfcR 



TEST DOES CAF 
ALL STAT B FLAGS 



CAF 
DrRe+18 
SZA 
HLT 



/CLEAH ALL 
/READ STAT 8 
/AKY 1 BITS ARE 
/DISPLAY FAILED 



St9ER0(l 

/ 

/ 

/NOk TEST WILL SELECT ERROR 
/SET AND READ BACK TO AC 
/AS 440000 BIT AND bIT 3 ONLY 
/XSA OLY MIGHT BE MORE THAN 5 MICROSEC 
LAC (7000 



EHROR 
SB 



SbEh0t 



DTLA 
JMP ,♦! 
JMP .+1 
JMP .♦I 

JMP .♦I 
DTRB+ia 
XOR (4400t!i0 

SZA 

HLT 
.EJECT 



/I 
/2 

/i 

/4 MiCKOStC 

/S* MICROSEC 

/AC SHOULD a 44W01/'»i 

/'«iO« SMUUtO » »5 

/OISPLAY FAILED BITS 
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SfiC ♦ 


MAlNOEC-lb-OArCA-A • MARCH 17, 19/2 • 






/cRhOR 


♦•LAG IS AC aiT Ik, Ohi IOkS 


Kid426 


7l^^4l'> 




lOKS 




i?a427 


5«23t3 




A\0 C2ii1i) 




V,<A4iV>. 


7«2i/J> 




XUK (2ii^ 




0^431 


74*2if 




SZA 




eii6*i2 


74^1^46 


f 


HLT 


/!(.•*& ^AIuED UN fcf s I 






/it ■ 
/ 


I OTEF SHOULD SKIP tFal 


m4ii 


75^9V:>f 


CLA 




00434 


7«75«l 




OTEP 


/SHOOlO SMf fcf" s J 


(9(1435 


74«J!B1 




CWA 


/SHaULO NUT f-£ EXfcCuTtD 


00436 


74i<l20£l 




S2A 


/AC NOT la fne-j NO Skip 


(10437 


740040 


58ER02 
/ 


HLT 


/SKIP KAlLEi) TO S«IP 






f 

/P«CB«A(i INTERRUPT SMOUCO fOT OCCu»« 






/STAT i 


C BIT 9 . t! 




0044J) 


202312 


/ 


LAC (JMP 


S8ER«3-1 


SI0441 


fl400ei 




OAC I 


/I^ CASE INT 


00442 


750000 




CLA 




00443 


700042 




ION 


/ENABLE PIE 


00444 


740000 




NOP 


/SHOULD NOT BREAK 


00445 


700002 




I OF 


/DISABLE PIE 


00446 


740001 




CMA 


/SHOULD Bt EXECUTED 


00447 


741200 




SNA 


/IF AC < ii 


00450 


740040 


5eEft03 
/ 

/0T8F S 
/ 


HLT 


/THEN INTERRUPT IN ERROR 






iHOOi.0 NOT J 


SKIP OTF a B 


00451 


790»e0 


CLA 




00452 


707601 




DTDF 


/SHOUUO NOT SKIP 


00453 


740001 




CNA 


/OTF ■ SHOULD EXECUTE 1 


00454 


741200 




SNA 


/AC a IS SKIP ERROf? 


00455 


740040 


S6ER04 

/ 
/OTXA w 


HUT 








ITH BIT 10 


a 1 SHOULD 






/NOT CLfcAH STAT 8 

> 


ERRORS 


00456 


202303 


/ 


LAC (200 




00457 


707544 




DTXA 


/XOR INH CLEAR tK 


00460 


707572 




DTRb*l0 


/READ STArus d 


00461 


741200 




SNA 


/ShOULO NOT Bt i) 


00462 


74^040 


sde«05 


HLT 
.EJECT 


/STAT 6 CLEARED 



CMA 
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e>adb3 


79ReCS' 


Ti'AibA 


71^7545 


«.5465 


7^7!!i7i' 


V><fiAb6 


740i!*<f 


pit^467 


74e^'4P 
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(^«47Pt 


2^2313 


PM471 


707645 


m«72 


6.5H473 


mA7Z 


6055474 


019474 


600475 


»tH475 


600)476 


P!a476 


707662 


0H477 


5«»23?I6 


(1(95<40 


74e<2p«i 


0V)5191 


74l!»»4e 



tl0S02 


202314 


00903 


!»4a»0i 


00504 


7500PB 


00505 


700042 


0M5(i)e 


740000 


00907 


700002 


00510 


740081 


00511 


7419200 


00512 


740040 



00513 


703302 


00514 


707572 


00515 


74«200 


00516 


740040 



00517 


750004 


00520 


5W2315 


00621 


740200 


014522 


74004(0 



/UTXA hlTh 8IT I'd » a 


SMOUtO CLtAH 


CLA 




DtLA 


/SKUULO CL6AK bi^ 


OfrtB^lifl 


/KEAU STAt 6 


SZA 


/AC SHUUUu s ,; 


/ 

/St GUING TO 1 5M00L0 


/UJSPLAY rAlLtO Sfc 


CLEAt. SA 8ir<J 


/XS eWROR STOP GENEHATEO 

/ 


/ 

LAC i274m 


/ALSu tNi «ir 


DTLA 


/SHJiJuU CAUSE 5c 


JMP .+1 


/■^AIT 6 


JiP .♦! 


/fllC^-OSfcC 


JMP .♦! 




JHP .♦! 




fJTRA + 10 




AND (20006 




SZA 


/liO ShOULO bE » 


5SER07 HLT 

/fcFBl St«l AND SA BIT 


/EK«0« STOP ^0T GE 


9 « I 


/Pit SHOULD CAUSE PROGWaH INTERKUPT 
/ 

LAC (JMP 58eR0«-l 


OAC 1 




CLA 




I0>4 


/PIE ON 


NOP 


/*AIT SHOULD BREAK 


I OF 


/PIE OFF (NOT EXCJ 


CMA 


/SHOULD NOT BE EXC 


SZA 


/INT OCCUR IF AC ■ 


8BEK0B HLT 

/ 

/CAP SHOULD CLEAR St I 

/ 

C*f 


/INT FAIL AC NOT 


N STAT 8 


/SHOULD CLEAR SE 


OTRB+10 


/SHOULD READ 0^S 


S2A 




SBEK09 HLT 

/ 

/END OF TESTS THAT CAN 


/CAP DID NOT CLEAR 


BE MADE 


/WITHOUT TAPE MOTION 




/HALT IF 3WS a 1000 




LAS 




AND (1000 




SZA 




HLT 




.tJECT 
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1^14525 
0'a52« 

(^Hb27 

{^0531 

CIMSi3 
ft (9934 
00545 
0^536 
510537 
CI«S4f« 
00541 
0vt942 
Mia543 
0iaS44 
00S4S 

e«546 

00547 
019550 
00551 
00552 
00553 
00554 
00555 
00556 
00557 
00560 
00561 
00562 
0t«563 
00564 
00565 



(»M566 
m567 
K*)57vt 
fiK571 



?i<23l6 
75*7545 
777777 

:*4M3i' 

014(12131 
?e232*5 

5l4(»^i«i 

140011 

?t!003? 

74011? ii 

740040 

707572 

743200 

600I54& 

7S17552 

5t;23vb 

741200 

600553 

440011 

600534 

440010 

600534 

740040 

707572 

242321 

740200 

740040 

7075S2 

902306 

740200 
740040 
200030 
740100 
740040 



7t»l3302 
7»>7b72 
74«20n 



/STAKl TAHE 
/UO A "llivt e 
/MOnITOk *C 
/UCCUkS fcZ S 
/IS StCONOS 

/ 

Tf.orsr UAC 
orLA 

t.Ar« 

OAC 
LAC 
OAC 
LAC 

OAC 

ozn 

LAC 
SWA 
TMEkPt* Hi.T 
0T»6 
S2A 
J«P 
OTKA 
AND 
SNA 
JMP 
ISZ 
JMP 
ISZ 
JMP 

TMe«01 Hi.T 

OT«e 

XOR 
S2A 

TMER02 HUT 
OTRA 
ANO 
8ZA 

TMERB3 HUT 
LAC 
SMA 

TME«04 HLT 

/ 

/CAF SHOULD 

/ 

CAF 

t»r«a 

SZA 

TMEK^b HLT 

.tJECT 



MOTION 1 
ACKwAkD 
LOCATION 
MOULD UC 
Ei 16 On 

-I 

wCLtJC 

CALOC 

(-32 

1«» 

U 

WCLOC 



♦ 10 

,** 

♦ 10 

.♦6 
U 

TMER0ei-2 
10 

TrtER0a-2 

♦ 10 
(50i«000 



♦ IB 
(20000 



E&Ti> 
INTO tl 

JIN CASC 1)6 
LV LE*i*L SfATuS 



hCLOC 



/5tT UP 



/<*c fu 



/CA AnO 



/-^f^eve^r cuu»det< 



/watch out 

/Ft>H OAT A fcKfAK 

/«t SmOULO MOT iNC,»<t«t*iT 

/6TAT 6 Any VcT 
/TtS 



/HAS 60 CLtAWeO 

/rts 



/wUITfcU do SECONDS 

/Nt' 

/MOTMlNG HAPPENJiO 

/READ STAryS 

/SMOULO «AKt eZ ANO EF B i3 

• AK'V OThEK « 1 IS ALSO ERKOH 

/DISPLAY BITS IN EtiiROH 

/ERROR STOP SHOULO 

/CLEAR GO SIT 

/feZ Oil) NOT CLEAR NOT 

/MAS DATA BREAK MADE 
/TES DATA BREAK IN ERROR 



CLEAR EZ AND EF 



/SHCULU CLtAR EZ 
/rtiku STATUS 
/At S^'UuUU = i/i 
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/NU» btJ t.1 AGAIN 

i 






PH572 


?ii«33n6 


/ 


LAC (a«?^Ht' 






(rMb73 


7«75i»4 




nrxA 






l^ti574 


7^767? 




tJ T K ;i ♦ I a 


/<**n i-o-i cz 




4^1^575 


7<Jl?«kn 




SNA 






^'i^sre 


6t^«b74 


/ 

/UT»» 

/ 


JMP .-2 










iftJTM AC BIT lt« ! 


a sf, ahUULO CLftAK i.L 




k"M577 


75M»)Ha 


CuA 






i'ldsai? 


7v»7544 




01 X 4 


/SHOULD CLEAR SfAT b 




15 0601 


70767S? 




t)rf*s*i«i 


/RfcAU blAfUS 




?i 1^602 


740200 




SZA 


/aiTS SHOULD GO TO f> 




e»)603 


74?.B4» 


/ 
/wHlTt 


HuT 










ALL SHUULO NOT 


CAUSE 








/A SELECT ERROR 










/USt M 


RlTt AUl. NORMAL 


MODE 




ei 1^604 


202322 




LAC (45400 


/ALSO ENJ 




00605 


707&48 




OTLA 


/LDAO wRIlE ALL 




CI06B6 


600607 




JMP .i-l 


/"lAIT FOR 




0H607 


60e6ifc 




JMP ,+1 


/xsa delay 




00610 


600611 




JMP ,♦! 


/TO GO AMAY 




00611 


600612 




JMP ,♦! 






00612 


707572 




OTRB+10 


/READ STATUS 




00613 


740200 




SZA 


/NO FLAGS SHOULD BE SET 




00614 


740040 


TME«07 
/ 
/NOW W 


HLT 










AKE TAPE GO 3KW|: 


» 








/D»TA 1 


BREAK SHOULD BE 


MADE WITHIN 








/250 MILLISECONDS AND 
J 


OTF SHOULD BE SET 




00615 


777777 


f 


LA»( -1 






00616 


046400 




OAC BUFFER 






00617 


040030 




OAC MCLOC 






00620 


202323 




LAC (BUFFER-l 






00621 


040031 




DAC CALOC 






00622 


202306 




LAC (20000 






00623 


707544 




OTXA 






00624 


202324 




LAC C-56000 






0062S 


040010 




OAC 10 






00626 


200030 




LAC WCLOC 






00627 


740100 




SnA 


/xC GO TO « 




00630 


600637 




JMP .+7 


/TES 




0K»631 


797i>7Z 




otrb+10 






00632 


740200 




S2A 


/ANY STATUS YET 




00633 


600637 




J(*P .♦4 


/YES 




00634 


440010 




IS2 10 


/WAITED ifow t^SEC 




00635 


600626 




JMP .-7 


/NO 




00636 


740040 


TMErtBB 


HLT 
.tJECT 


/NOTHING HAPPtNEO 2311 ^S 


t 
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V\Vi6'i7 


9H?i93tS 


l^ia64« 


74'i»2HKi 


H0641 


74P<i)4(fl 



00642 


2K»0ki31 


00643 


542323 


00644 


740«40 


015646 


S423i; 


00646 


741000 


00647 


740040 



00690 
00651 
00692 



00653 
010694 
00659 



707972 

740100 
600650 



S4232S 

74020)!) 
740040 



014656 


206400 


00697 


740(l<01 


0«1660 


74020^ 


0«I661 


740040 



/OlO CA Chance 

/NCI 010 NOT ♦» 

/CA ONLY ♦! 

/YtS 

/CA INCWEIENTEO liiCUKRECr 



/"*C • 7/7/77 IS fvu B«t.AK 

/• irf IS 1 ^KFak 

/HOSITIVE 4N0 NUT I 15 .nCHt IHAiv i H«tAA 

/t£»7 >iC. TO HAVt 1NC« 

/I•KU^ i«lhni; ALL 

/ 

LAC *lLUC /«C ShOuLU COi,.»T 

s^* /uKct ANo cjNLr ONce 

TMfcKt'vj HLT /NC s PS KS f^UKt TnA-^ i r5WtA^ 

/ 

/ 

/LA SHOULD 8E luCHE^EftXtO 

/ONCt AND QftiLV UWCe 

/ 

LAC CALUC 
SAO (tSUPFfcR-l 
HLT 

SAO (BUfffeM 
SKP 
TMEK10 MlT 
/ 
/ 

/■NAIT FOK EZ INTEKRuPT 
/ 

OTRe*H^ 
SMA 

JMP ,-2 
/ 
/ 

/NOW TEST FLAGS EF tZ AND DTK SHOULD » I 
/OTF SHOULD SET DU«ING MA DATA BRcAK 
/ALL OTHER FLAGS SHOULD ■ 
/ 

XOR (500100 
SZA 
TMERll HLT /OISPLAY FLAGS IN ERHOR 

/ 

/WRITE ALL SHOOLO NOT HAVE INPUT 
/BUFFER SHOULD STILL 8£ 777777 
/ 

LAC BUFFER /GET WQRO WRITTEN 
CHA 

Si£A /n»S n ALIEREO 

TKER12 HLT /wk'ITE ALL INPUT 

.EJECT 



PAGE i3 



TCbXPJ SWC 



• «AlNUfeC-l5-V)ATCA-A * MARCH 17, 1972 ♦ 



P«j6e2 


?P?32b 


?i.5663 


707544 


H'^664 


75I7S72 


piaeet 


243326 


00666 


7402t9« 


99i667 


740040 



00670 


7^0314 


03671 


302303 


00672 


242303 


00673 


740200 


00674 


740(1140 



00079 


202327 


00676 


(»4«0B1 


08877 


7SfW0 


00700 


700042 


00701 


740000 


00702 


700002 


00703 


740001 


00704 


740200 


00705 


740040 



00706 


202330 


9<»7id7 


707544 


00710 


202331 


00711 


040W01 


00712 


750000 


(•1^713 


70«0-«2 


00714 


740000 


0071S 


700002 


00716 


74PI001 


00717 


740100 


00720 


74004f)!i 



/fMt oecTAPe FtAG Srtouto ■'*c.'T 

/*ITH AC SIT U » 1 ANO orxA 
/tZ SHOUUO CLtAK AC BIT 1» s 

/ 

LAC Cliin 
OTXa 

xo« (i(a:i 

SZA 

HLT 



CLfcAK 



TMhK13 

/ 

/ 

/ 



/OTf Should koi 

/KPAO STAIUS 

/iHOUL'J 
/ALL BITS SHfJULl; 
/DISPLAY BITS In 



LLfcAK 
CcEAi^ 

S '<-r 



CM-' Pij; 



1 aHDULO KfcAO HACK TOWS tjll Ik* 



TMEK14 

I 

t 

/STATUS 

/ 



IO«S 

AND C200 
XOR C2»)ie 
S2A 
HLT 



/K6Au I/O STATUS 

/^A&K oir 1?, 

/shuulo f'AKe 

/lows FAlLfcO 



IT 



A BIT 9b1 SHOULD IM WITH PIE s i 



TMEHIS 

/ 

t 

/STATUS 



LAC 
DAC 
CLA 
ION 
NOP 
lOF 
CHA 
SZA 
MLT 



A BIT 9 



(JMP THER15-1 

I 



/PIE ■ 1 
/SHOULD EXECUTE 



/INT 
/ 



TMES16 



SHOULD NOT 

LAC (5a« 

DTXA 

LAC (JMP 

OAC 1 

CLA 

ION 

NOP 

lOF 

CMA 

SMA 

HLT 

.tJEcr 



* AND 
OCCUR 



/SHOULD 
/SHOULD 
/AC NOT 



DTF 



7 THE BREAK 
NUT BE EXECUTED 
NOT BE EXECUTED 
i DID NOT BREAK 



/AND 
THER18-) 



NOT 



/CLEAR 
CLEAR 



SA 9 
OTF 



/EKAbLt 
/SHOULD 
/SHOULU 
/SHOULD 
/AC SHOULD 
/AC B 13 



Pit 

NOT BREAK 
BE EXECUTED 
EXECUTED 
HE NEGATIVE 
ILLEGAL INT 



8E 



PA6t 14 



TCBKPg 8KC 



• MAlNDtC-lb-DATCA-A ♦ maHCH 17, 1972 ♦ 



01721 


75P«»Pi|fS 


00722 


7f755'l 


^k!i72i 


74P!i?l?{ 


01^724 


74>;t2t>t' 


0bt725 


74(»n4r' 



B0726 


rt^fMBv 


0i>l727 


707561 


Bi(j73B 


74?ieiPl 


00731 


7401»I0 


e!d7i2 


7«ViV>4\e 



00733 703302 

00734 707572 

00735 740200 

00736 740040 



00737 


202332 


00740 


707545 


00741 


777776 


00742 


040030 


00743 


202323 


00744 


040031 


00745 


202333 


00746 


040010 


00747 


200030 


00750 


740001 


00751 


741200 


00752 


6007S6 


007S3 


448010 


00754 


600747 


00758 


740040 


00736 


707S72 


9iV)7i7 


242326 


00760 


740200 


«(?761 


743040 



/DTSF SHOUCU SKIP OTF 
Cl* 
OTOP 
CHA 
S2A 

/ 
/ 

/OrtF SHOULD NOT SKIP 
CLA 
07EF 
CHA 
SHA 
HUT 



/ 
/ 
/ 

/CAF SHOULO CLEAR OtCIAPE FLAG 



» 1 

/CtfcAH F0« lNulCATOi< 
/SHUULt) S^H CMA 
/St-OULU NUr Pfc feXtCuTtt 
/AC nOI ,', TS nOI S>nlP 
/JTSF FAICeO 10 SHIP 



/CLtAR FOK INOICaTOk 
/SHOULD ^JuT SKIP tF s f 
/ShODlU t^OT BE kXECurtD 
/AC « t IS SKPO 
/OlfcF bKIHPgO In tWHOti 



CAF 
OTRd*l0 

TMEK19 HLT 

/ 

/ 

/OO A RfcAO ALL FORWARD 

/SHOULD DATA iJREAK wIT 

/ 

LAC (02^000 
DTLA 
LAW »2 
DAC WCLOC 
LAC (iiUFFER-1 
DAC CALOC 

LAC c-iggBaa 

DAC 10 
LAC WCLOC 
CMA 
SNA 

JMP .+4 
152 10 
JUP ,-5 
TMeR20 HUT 

DTRB*ia 

xoH (laa 

S^A 

TMEK21 HLT 

.tJECT 



/CLEAR ALL 
/READ STATUS 
/AC SHOULii s .5 
/CAF 010 NOT CLfcAR 



NORHAt. MOOt 
HIN 2S0 MILLISECOMOS 

/READ ALL FOR-«ARD 
/LOAD AND GO 

/8 W0R08 
/INTO BUFFER 



/mC *l YET 
/YES 

/rtAITEU 25iij MILLISECONDS 
/NO 

/NOTHING In 25fe MSEC 

/UfF SHOULO « J 
/ALL OIHenS m 
/uTF uiu Nur at I 
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0M762 
00763 
Vi\fl766 

C«766 
»i,l7b6 
Pia767 



01006 
01007 
01010 



?»0«3i 
542323 

74«^ 4(« 

549317 

741f)V)lfi 

74»e.4ei 



Pi»77t" 


7777M 


0v»771 


M40Kil(o 


00772 


707572 


00773 


741100 


00774 


600777 


0077S 


44001^1 


00776 


800772 


00777 


24?334 


010«« 


740200 


01001 


74«fl40 


01002 


707552 


01003 


502306 


01004 


74«2fl0 


01009 


74'0«40 



200030 
740*00 
74fl«'40 



01011 


702303 


01012 


707544 


01013 


707672 


01014 


24a335 


01015 


740201/! 


01016 


740W4((' 



/iHt CA SHOULD Bt iNCk ♦! 

LAC CAUOC 

SAD (cJUrFLR-l 
TrchZii HLT 
/AMI) UNlV ♦! 

SAL) (bU^^tN 

TMtW23 HUT 

/ 

/ 

/NOh A TIMING E«ROR SHOULD QCQOk 

/*ITHIN 2&i4 MICHiPSECONOS 

/ 



LAin -l^Ki 

DAC It) 
l)TRS*10 
SPA 

JHP ,+3 

ISZ J« 

JiiP .-4 



/SEAO STATUS 

/EF YET 

/YfcS 

/^AITEO 2a« USEC 

/MO 



/ 
/ 

/TIMING Ef AND OTF SHQULU « 1 

XOR (410160 /SHOULD MAKE AC « 

SZA /HIGHT FLAGS 

TMEN24 HLT /I BITS AHE EHROK MIGHT ACT « 

/ 
/TIMING EKROR SHOULD CLEAR MOTION 

OTHA4.10 /RtAO STAT A 

ANO CGOBIT /MASK MOT BIT 

SZA /TIM CLEAR IT 

TMER2S HtT /TIM DID NOT GENERATE ERROR STOP 

/ 
/ 

/A DATA BREAK SHOULD NOT mAVE 
/MEN MADE KCO AT LAST 08RH 
/ 

LAC WCLOC 

S^A 



/OeWKO THRU WC 



TMER26 HLT 

/ 

/ 

/OTXA WITH AC BIT 1 i? b i AND U » » 
/SHOULD CLEAR OTF AND NOT CLEAk TIMING 
/ 



/SHOULD NOT HAVE CHANGED 
/DID IT *l 

s ft 



TMEH27 



LAC (200 

OTXA 

DTRB*10 

XOR (4lia0i90 

SZA 

HLT 

.EJECT 



/SHOULU CLtAk Of)- n»i^ 
/REAU ST A I e 
/«»KE tF ANU TI'-l * i- 
/OIF CLEAN AND NOT TI'^ 
/DiSHLAr FLO bUS 
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«1017 7e33?2 

»1B20 787572 

ir>lil21 74i42eit4 

Hltt22 74(!!ji)4«! 



01023 
01024 
01029 
01026 
01027 
01030 
01031 
01032 
01033 
01034 
01035 
01036 
01037 
01040 
01041 



01042 
01043 
01044 



802336 
7B7S45 
777776 
040030 
202323 
040031 
202333 
040010 

200030 
740001 
741200 
601042 
440010 
601033 
740040 



707572 

740200 

740040 



01045 


7777m 


Mt046 


^40010 


01047 


200030 


01050 


741201? 


(('1051 


6V)1056 


01052 


44001fe( 


01053 


601047 


b11054 


740ii40 



/CAF SHOULD CLEAR TIMING 6RR0« 
/ 

CAF /CLtAR ALL 

Or«H*l0 /«EaO TIM EftHOS 

S^A /STAT ti ShOUta » f^ 

TMtR?a HLT /OISf»LAY KLO StAT H 

/ 
/ 

/NO* 00 A R£At) ALL KOkWARO C rtOOE 
/SET CA FU« 2 WORDS 

/IST DATA BREAK WITHIN 26« HIULISfcC 
/8N0 DATA SNEAK WITHIN 2S0 HlCi^OStC 
/gNO BRK SETS OTF 

/A THIRD BREAK SHUUtO NOT bfc MAOE 
/ 

LAC (33t90ie 

DTLA 

LAN «2 

OAC WCLUC 

LAC C8UfFER-l 

DAC CALOC 

LAC (-1220<i)0 

OAC 10 



/WEAO ALL C MODE 
/LCAO AND START 

/a *oRo 

/INTO bUFFEH 
/COUNT 25i4 MIULISEC 



LAC WCLOC 

CMA 

SNA 

JNP .*4 

ISZ 10 

JMP .-5 



/NC +1 YET 



/rES 1 BREAK MADE 

/WAITED 250 MILLISEC 

/NO 

/NO DATA dREAK 250 HiLLISEC 



TfiER29 HLT 

/ 

/ 

/THE DTF SHOULD NOT HAVE SET 

/ 

DTRB+10 /READ STAT B 

82A /DTP SHOULD • NOT rtCO 

THER30 HLT /DISPLAY ERROR STAT B 

/ 

/A SECOND BREAK SHOULD 8E HADE 
/NITHIN 250 HICROSEC OF LAST 
/SINCE wCO OTF SHOULD ■ 1 

LAW -10») 

OAC l^ 

LAC WCLOC 

SNA 

.♦4 



TMER31 



JMP 
ISZ ltd 
JMP ,-4 
HLT 
.EJECT 
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/2m BRtAK SHOULU StT OTF 

/ 
151855 7M7:)72 l>1RB*ie /READ STAf t) 

^1056 ?42326 xti« (1«^ /O^LV OTF ShUuLH 

f»10a7 74P^*H' S2A /«4S STAT CQii 

Pil0bf! 74f"5'4C Tmi-:R32 HLT /OlSPUAf l-AILtU bili 

/ 

/ 

/A THIRD ttKEAK SHOULD NOT bt KAOE 



VilVltl 


yJlTi'V, 


v\l9bi 


914001^ 


H1063 


200050 


01064 


740200 


01065 


740040 


01(966 


440010 


01067 


601063 



01070 


703302 


01071 


707552 


01072 


502306 


01073 


740200 


01074 


740040 



01075 


202337 


01076 


707545 


01077 


140030 


01100 


202323 


01101 


(■140091 


01102 


777777 


01103 


B4»a77 


01104 


2023^0 


01105 


^40010 



/GET .vC 

/oia II +1 

/OATA BREAK THRU WC « 
/WAITED 2t)V HIC SEC 

/NO 



LAW -10*< 

DAC ItJ 

LAC WCLUC 

S^A 
TMERSi HLT 

ISZ 10 

JMP ,-4 
/ 
/ 

/I/O POWER CLEAR CCAF) SHUULD CLEAN TAPE MOTIOK 
/ 

CAP /CLEAR ALL 

DTRA+10 /READ STAT A 

AND (60BIT /MASK MOT BIT 

SIA /DID IT CLEAR 

TMER34 HLT /NO POWER CLEAR FAILED 

/ 
/ 

/NOW DO SEARCH FORWARD NORMAL NODE 
/DATA BREAK SHOULD BE MADE wlTHIN I SECOND 
/ - - ^ ■ 



LAC (21000 

DTLA 

DZN HCLOC 

LAC CBiJFFER-l 

DAC CAtOC 

LAH •! 

DAC BUFFER-l 

LAC (172366 

DAC 10 

.EJECT 



/SEARCH N HOOC 
/LOAD AND SO 
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/MOMTOH «C FOS 1 SECOND 
«»lli«6 ?(J'?H3^ LAC WCUUC 

01107 74£»2i«0 S/A /HftfcAK rtAult VeT 

i«lU0 iSaUl" JMC ,♦« /rf-S 

1(11111 4<5»H1«« ISZ 1^ /'.AlTtO 1 SfeC 

kJllU fii^tlflO JMP ..4 /MC 

^1113 74S!H<k! TMeh3!> HuT /NO DATA bRfcAK f-QK I SfcC 

/ 

01114 7^7a72 orHafi"* /keau stat o 

PUIS 342326 XOR (IBw /ONLY OTF ShOuUO pE ScT 

e>lH6 74Cl2pt1 SZA 

Pill? 74?ip4(f« T«Eh36 HuT /UISPUAY blTS IM fc«*<LIK 

I 
/ 
/C« SMOUUO NOT 1NC« IN StAf-Cti 

LAC CAUOC 

SAO (BUfFKR-1 /OJU CA +1 

SKP /NC 

TMEH37 HtT /♦! 10 CA INH FAlUtU 
/ 
/KAS TRANSFER DIRECTION InPuT 

UAC BUFFER-l /GET iNPiJl «OkO 

CMA /ShOutO NOT ■ (?i 

SNA /INPUT MAOE 

TMER36 HIT /APPAKENTUY OUTPUT 

.EJECT 



?>n2c< 


200031 


«itl21 


54292^ 


eU22 


74ii»e0 


0U23 


74004^ 


0U24 


2«6377 


01125 


74ee{ii 


01126 


741200 


01127 


740040 



HAut rs 


TCBXP2 S«C 


^113!! 


2PI3341 


P1131 


707544 


i"1132 


777776 


k'lua 


ntpiiew 


vtiim 


2e?34? 


f«U35 


■j^Amiv) 


(^1136 


zsitiriit) 


pin37 


74lHii8il 


«<U40 


741 2»H 


k*114j 


60114& 


0U42 


440010 


0U43 


601136 


?tl44 


740040 


8»n45 


707572 


01146 


740200 


01147 


749)040 


eiise 


20{!342 


01151 


04001(1) 


01152 


2(90030 


01153 


741200 


01154 


601160 


01155 


440010 


01156 


601152 


0U97 


740040 


011S0 


707572 


01161 


242326 


01162 


740200 


01163 


74004(1 



01164 
01165 
01166 
01167 



202343 
707544 
777377 

040030 



« MAlN0tC-l5-L(ATCA-ft • MARCH 17, 1972 ♦ 

/TAPE Should still be moving 

/CHANUE TO SEARCH C MODE 

LAC iiiemv, 

OTXA /SfcT C MODE eiT 

LAW m-i /jJtT UP ? wOf-uS 

DAC t»CLUC 
/ 
/HHS1 DATA BREAK IS APPBUX b6 KILLISEC 

LAC C-2J42t4 

OAC in 

LAC WCLOC 

CMA 

SNA 

JMP ,+4 

ISZ 1(9 

JMP ,-5 
TMER39 HLT 
/ 
/NO WCO SMOULO NOT SET OTF AT BREAK! 

DTRB+10 /READ STAT 8 

SZA /NO FLAGS Should » i 

TMER40 HLT /DISPLAY ERROR STAT 6 

/ 

/2N0 DATA BREAK APPROX. 59 niLLISEC 

LAC (-23420 

DAC 10 

LAC WCLOC 

SNA 

JMP .+4 

ISZ 10 

JMP ,-4 
THER41 KLT 



/ijfcT «C 
/MAKE ♦ 
/bfttAK YEi 
/YES 

/WAITED 7ia MILLISEC 
/NO 
/NO DATA bRfcAK 70 rtlLLlSEC 



/SECOND BREAK 
/MADE YET 
/YES 

/KAITED 70 HILLISEC 
/NO 

/waDmr w!f«K 7b miluscc 



/KCO SHOULD SET DTP IN CMOOC 

OTRB*10 /READ STAT B 

XOR (100 /WCO SHOULD SET OTf 

«* /OTF • 1 ALL OTHERS » 

TMER42 HLT /DtSPtAY BITS IN ERROR 

/ 

/NOh CHANGE TO READ DATA 
/NORMAL MODE SET WC TO •257 
/ 

LAC (13000 

OTXA /CHANGE TO ROATA NORMAL MOOt 

BLENTH-1 /-267 

DAC WCLOC /FOR wC 

.EJECT 
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f 1171 
k»1172 
ft 173 

01174 
«I1175 

«1176 
01177 



7/7575 

440«l(ii 
6i?1172 

2i^ee3it 

542344 

741001^ 
740«40 



0i2(af* 


777700 


01201 


^40010 


012102 


200030 


01203 


54234S 


01204 


601210 


01205 


440010 


01206 


S01202 


01207 


740040 


01210 


707572 


01211 


740200 


01212 


740040 



01219 


202346 


01214 


340030 


01215 


040011 


01216 


777720 


01217 


040010 


01220 


200030 


01221 


5400X1 


01222 


601226 


01223 


440010 


01224 


6(^1220 


01225 


740040 


VI1226 


740001 


?'1227 


74i;!2H0 


01230 


601213 



/USST DATA BHEAK SHOULD NOT OCCUR 

/FOrt AT LtAST 42H MiCHOSeC 

/ 

L*"< 'Alii 

OAC J id 

ISZ 1/ /ri«t uuT 42fi 

JMP .-I /.llCtiU bgC 



/OKtAK *IAUC 1t\ 

/NO 6KtAK rjT OK 

/(<PATA h«cAk in <jTaT bLOC^ ui< RKvCk 



/(i£T "jC 
/dhEAK YET 
/ffeS 

/TlMEO OUT 30»i) HICSOSEC 
/NO 
/NO HOATA b«EAK 



LAC WCLOC 
SAO (»UtMM-j 
&«P 
TMEK4d HLT 
/ 
/ 

/H«SI DATA aWEAK SriOOLU UCCUW 
/NITMIN NEXT 30^ MiCROSfcC 
/ 

LAW -108 
OAC lid 
LAC WCLOC 
SAD (SLfcNTM 
JMP .♦4 
ISZ lv4 
JMP .-4 
TMER44 HLT 
/ 
/I TO OF SHOULD NOT SET DTP 

DTRB+10 /HEAO STAT U 

S2A /HO FLAGS SHOULD « 1 

TMEP4S HLT 
/ 
/ 

/EACH SUCCEEDING DATA BHEAK 
/SHOULD OCCUR WITHIN 300 HICROSEC 
/OF LAST DATA BREAK 
SVinCPl LAC (1 

TAO WCLOC 
OAC 11 
LAW .60 
DAC 10 
LAC WCLOC 
SAD 11 
JMP ,♦4 
ISZ 10 
JMP .-4 
TMEN46 HLT 
/ 

CMA 

SZA 

JMP SVWCPl 

•EJECT 



/CURRENT mC +1 
/SAVE FOR COMPARE 



/BREAK MADE YET 

/YES DATA bfiEAK 

/WAITED 3l«B MICHOSEC 

/ND 

/NC UHHK 3i(lH MiCHOStt 



/266 «QROi) YET 
/NO 



PAGfc 
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TCBXP2 


SRC 


m23j 


777534 


/ 

/ 


»I1232 


(i40eii0 




{^1233 


AAmiie 




C11234 


6/1233 




t^l235 


75'7572 




P)i236 


5«*2347 




01237 


242326 




0124(t 


740200 




f 124J 


74i?»5-ill? 


Tl 
t 


f^l242 


777634 


/I 
/I 


01243 


I^4001t9 




01244 


440010 




01245 


601244 




01246 


?0003« 




01247 


740001 




01250 


740200 




01251 


740040 


Tt 



01252 


202341 


01253 


707944 


01254 


777000 


01255 


040030 


01256 


202323 


01257 


940031 



01260 


2023S0 


01261 


440010 


01262 


2^0031 


01263 


542351 


01264 


601270 


01265 


440ei0 


01266 


601262 


01267 


740040 



* MAIN06C-15-DATCA-A • MAWCH 17, 1972 • 

THt UT^ SHOULD SET mlThli^ 3^455 MICROSEC 

STAT CHECK GOING TO B AND KDATA NORMAL 
-14« 



LAW 
DAC 
ISZ 



Iv) 



•1 



/TlHfc OuT Ut\ HICKObtC 



hE«47 



ANO t357777 

SZA 
MLT 



/MASK 



PAK 

/IJNLY 



OTF SriOULl) » J 



/OlSPLAT KAILEU bITS 



WAIT ANOTHER 3613 
KCLDC SHOULD NOT 
LAN .144 
PAC \yb 
ISZ 10 
JMP .-1 

LAC WCLOC 
CMA 
S2A 
MEH48 KLT 



MICHOSEC 

CHANGE 



/riMt OUT 301;! 

/MICRO SEC 

/WC GET +1 



/DATA BREAK DURING IDLE 



NOIx CHANttE TO READ DATA 
C MODE SET WC FOR 2 aLOCKS 
DTP SHOUtD NOT SET AT ENO OF 
FIRST BLOCK NO WCO, DTF SHOULD SET 
AT END OF SECOND BLOCK MC MILL > 



LAC (10000 

DTXA 

LAW -1000 

DAC WCLOC 

LAC (BUFFER-1 

DAC CALOC 



/SET CHOOE 

/•512 

/FOR 2 BLOCKS 



SHOULD MAKE 256 DATA BREAKS 
KITHIN NEXT 56 MILLISEC 



TMeR49 



LAC (756700 

DAC 10 

LAC CALOC 

SAO (bUFFK2-l 

JMP ,♦4 

ISZ 10 

JMP ,-4 

HLT 

.EJECT 



/SET CA 
/END OF BUFFER 
/YES MADE 256 BHKS 
/"AITED 1 BLOCK TlMg 
/NO 
/UlSPLAT CA 
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0t27ei 


777470 


9:1271 


^4{»^li' 


W1272 


44301/. 


(»1273 


6<'1272 


01874 


??i3a3e. 


H1275 


542345 


01276 


741f>(i)H 


("1277 


740^4^ 



(113190 


707572 


P130t 


502347 


fiaaa 


74(!l2e0 


^^i93 


74(»040 



01304 


202352 


01305 


040010 


(1)1306 


200030 


01307 


741200 


01310 


601314 


01311 


440010 


01312 


601306 


01313 


740040 



01314 


707578 


01315 


502347 


01316 


740200 


01317 


740040 



01320 


777634 


01321 


«|40010 


?'1322 


440010 


?tl323 


601322 


01324 


707S72 


0132S 


502347 


(^1326 


342326 


01327 


740200 


01330 


74004(1 



/tiMt OUT 600 MICROSEC 

/NU MORt OATA B«KS SHOUWO Si MAUe 

/ 



UAW 


-il/i 




OaC 


in 




ISZ 


1^ 


/riHfc UUT 


JhP 


.-1 


/ofcB Mic«usec 


LAC 


"CLOC 




SAO 


((Jl.fe\TH 


/«»<£ ANV MOKc bHfcArtS 


SKP 




/NC 


HLT 




/EXTRA DATA bkfcAub 



Th"t«SP 

/ 

/THt UTf- SHOUUO NOT 8E SEr 

/kOsTa CMUOfe ANO i»C = I 



THEK51 
/ 



OTR&*10 
AND (357777 
SZA 

HLT 



I 



/HEAD STAI 6 
/lASK OFF PARITY 
/ANY OTHERS SET 
/DISPLAY PLA5S IM EkKOrt 



/NO" SNOUUO MAKE ANOTHEW 260 

/UATA BKEAKS NITHIN NEXT 56 MILUISEC 

/ 

LAC (-34000 

OAC 10 

LAC WCLOC 

SNA 

JMP ,♦4 

ISZ 10 

JMP .-4 

HLT 



TMEK52 
/ 



/••C GO TO veT 

/yes 

/& BLOCK TIME EuAPSEU 
/NO 



f 



/NCO SHOULD NOT SET OTF BY ITSELF 
/ 

OTRBflB /READ STAT B 

ANO (357777 /MASK PARITY 

S2A /SHOULD HAVE NO OTHER FLAGS 

TMER53 HLT 
/ 

/TIME OUT 300 M1CK05EC THEN 
/THE OTF SHOULD BE SET ST CHECK TO 
/ROATA C MODE AND WC « 

LAM -144 

OAC 10 

ISZ 10 

JMP .-I 

DrRB-fl0 

AND (357777 

XuR Cl0feJ 

SZA 
TMER54 HLT 

.EJECT 



/TIME OUT 3»0 
/MICRO SEC 
/KfcAt) STAt B 
/MASK fA«iTY 

/ONLY OTF Should 

/DISPLAY FAILED BITS 



PAGE « 



TCBXP2 SrtC 



* WAlNOEC-15-DATCA-A • MARCH 17, 1972 * 



P1332 
H13J3 

?il334 
(11335 

«I1336 
01337 

0134fl 
P<t341 
?)1342 
?1343 
01344 



01345 
«it346 
01347 

e>i3S0 

(11351 
01352 
01353 
911354 



01359 
01350 
01397 
01360 
01301 
01362 
01363 
01364 



?f7b72 
74120(111 
6ei336 
2023S3 
70754 4 
777377 
04003^ 



777702 
040010 
440010 
601347 
200030 
5423^44 
741000 
74004« 



777634 
040010 
209031 

94^317 

001369 
440010 
601357 
740040 



01365 


202346 


01366 


340030 


01367 


« 4 0011 


01370 


777720 


01371 


A40010 


01372 


200030 


01373 


540011 


01374 


601400 


01375 


44«V}H^ 


01376 


601372 


01377 


740040 



/NO* CHANGE eAC^ TO S£A«Crt NORMAL >*ODE 
/ANO TEST WHITE DATA OVE» NEXT BLOCK 
/ 

LAC (130i(|ii(i 

orxA 

Oi» WCLOC 
UAL (aLRt^NJ 
DAC CALUC 



/Cf'ANtifc TO SfcAKCH r> M.',Lf 



DTrt8*ia 

SNA 

JMP ,-2 

LAC C5000 

DTXA 

BLENTM-1 

DAC WCLOC 



/flHO WLOCK YcT 
/"AIT ^OR ST dLR 

/CHANbt TQ i^RITE OATA 

/-257 



/TIME OUT 
/28ifl MICROSEC 

/MAKE ANY BREAKS 

/NO 

/PREMATUR WOATA BREAK 



/SHOULD NOT MAKE ANY BREAKS FOR AT uEAST 28P! USEC 

LAW -76 

DAC 10 

ISZ 10 

JMP ,-l 

LAC NCLOC 

SAD (BLENTH-1 

SUP 
TMEB55 HLT 
/ 

/THE flH8T OATA BREAK SHOULD 
/OCCUR DURING STATE REVERSE CHECK 
/WITHIN NEXT 300 MICROSEC 

LAW -144 

DAC 10 

LAC CALOC 

SAO (BUFFER 

JMP ,t4 

ISZ 10 

jnp ,-4 

TMER56 HLT 

/ 

/NEXT 255 DATA BREAKS 

/SHOULD OCCUR WITHIN 300 

/MICROSEC OF EACH OTHER 

WDWCPI LAC (1 

TAD WCLOC 
OAC 11 
LA»( -60 
DAC \ie 
LAC WCLCiC 
SAO 11 
JMP ,+4 
ISZ 10 
JMP ,-4 

TMER67 HLT 

.EJECT 



/HAKE 1ST BREAK 
/YES 

/WAITED 300 MICSEC 

/NO 

/NO BREAK STATE REVERSE CHECK 



/CUSHENT wC +1 



/SAVE IT 



/HAKt: NEXT b»tAK 

/its 

/WAITED 3niS MICatC 

/NC 

/NO oBRK js),a Micstc 
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eil4i(Jl 

«I1402 



74f'icei 
7'4!iat5» 



01403 


7777»tfi 


1^14144 


n4^eie 


ei4os 


44001(9 


«t4i36 


601405 


014i»7 


2«0B3B 


B141I" 


74PIPitll 


014U 


740200 


01412 


74004P 



01413 


777600 


(11414 


fl40010 


01415 


448010 


01416 


60141S 


01417 


707572 


01420 


242326 


01421 


740280 


01422 


740040 


01429 


200030 


C1424 


740001 


01425 


749200 


01426 


740040 



01427 


777470 


(41430 


i^Amte 


01431 


44001(9 


PH432 


6P1431 


01433 


200030 


01434 


740001 


««1435 


740200 


01436 


74004^1 



/riM£ OUT 

/Zii: MIC isEC 

/CtT wC 

/tXT«A BRtAR 

/*»DATA BRfcAK &TATe FiNAl. 



/set IF 236 DATA bR£AKS rtT 

Cma 

S/A /MAlJt 256 BkEaK{> 

J«P WOWCPl /NO 

/ 
/ 

/TIHE Out 2iS? «ICKO stc 

/kRITE liATA SMOULO NOT QATA (SRtAK DURING iTATt FI^At 
/ 

LAW -102 

DAC i\d 

ISZ 10 

JMP .-1 

LAC ViCLOC 

CMA 

SZA 
TMEftSa HUT 

/ 

/TIhe OUT ANOTHER 200 USEC 

/OTF SHOULD GO TO I AnO NO UaTA BHEaK 

/OURING STATE CHECK 

/ 

LAM .200 

DAC 10 

ISZ 10 

JNP ,-l 

OTRBf 10 

XOR (100 

SZA 
TMER59 MLT 
/ 

/KRITE DATA DATA BREAK SHOULD 
/BE INHIBITED DURING STATE CHECK 

LAC WCLOC /GET WC 

CHA 

52A /EXTRA BREAK 

TMER60 HLT /wDATA BREAK STATE CHECK 

/ 

/TIME OUT 600 MICROSeC 

/WREN SHOULD GO TO DURING STATE IDLE 
/AND NO MORE DATA BREAKS 
/ 



/♦ A LITTLE XTRA 
/TIME OUT ABOUT 

/^i)^ tiicROSEC 

/READ STAT 8 

/OTF SHOULD ■ 1 

/DISPLAY ERROR BITS 



JfEH6l 



LArt -310 
DAC 10 
ISZ la 

JMP .-1 

LAC WCLOC 

CMA 

SZA 

HLT 

•EJECT 



/TIME OUT 6lii»0 MXCSEC 
/u£T wC 

/OID IT *l 

/wRtN PROS 010 NOT GO TO i-'- 



: ?r 


TCBXP2 SKC 


P14J7 


777776 


f*144SI 


Bi4tnB'3i' 


f-1441 


gt'i'iS'av^ 


«1-J42 


7 4net»l 


?1443 


74»)2JSl« 


(i'1444 


6.^1441 


I9144S 


777470 


l<;1446 


014081 (» 


01447 


44PI01(« 


01450 


6^^1447 



01451 


7PI7554 


B14&2 


442160 


»14S3 


601452 


01454 


707572 


01 455 


242335 


81456 


7 4ft 200 


01457 


740040 



01460 


707554 


01461 


601462 


01462 


601463 


01463 


601464 


0t464 


90 1 469 


01465 


707572 


01466 


740200 


01467 


740040 



• MAlNOEC-lb-lJATCA-A • MAHCH 17, 1972 * 

/w«ITt OATA mlH. MAKE I DATA BHfcAK AT STATE ktvf-«i>fc C-lkCN 

LAW -2 

DAC wCLUC 

LAC WCLOC 
CA 



S/A 

JMP 

LAW 

DAC lid 

ISZ IM 

JMP .- 



-3 

31k3 



/WAIT K)W UtJkK 

/AT NtxT HfeVE^St CHcC< 



/ 
/ 

/A JTXA AT THIS POINT WITH 
/W»1TE UATA WILL LAJSE TIDING EHRCJH 
IDLE >0 

/XOH B'S 



/STBLKMKK AND ST 
OTXA+10 
ISZ DLY 
J1P ,-1 
OTR8+10 
XOR (4100(190 
SZA 
MLT 



1 



/•HOATA ALKEADY a 

/WAIT 

/TIHINti SHOULD BE » 1 

/SHOULD CLEAR TIM AND EF 

/OISPLAT fAILEU BIT 



TMEH63 

/ 

/NEXT OTXA SHOULD CLEAR TlhiNG 

/LAST ERROR MAKES US > WHICH SHOULD 

/CLEAR STATE RES TO STATE IDLE 

OTXA*10 /CLEAR AGAIN 

JMP ,♦! /WAIT 6 

JMP ,♦! 

JMP .♦! 

JMP ,♦! 

OTRfl+10 /READ SHOULD ALL » 
SZA 
TMER64 HLT /DISPLAY ERROR STATUS 

.EJECT 
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C"147« 


?»»233? 


V.14/1 


7?7545 


(«1472 


l4iH:il^- 


P1473 


2i?2323 


fflAJA 


1^40031 


01475 


290(430 


B1476 


74186)0 


«1477 


661475 


l?!15t)0 


302364 


disai 


707544 


f*i502 


777001 


01503 


^40030 


«ii5li4 


902323 


01505 


04^031 


fiisiafi 


2023S2 


01507 


fl40010 


01510 


200031 


01511 


542351 


01512 


601516 


01513 


440010 


01514 


801510 


01515 


740040 


01516 


777470 


01517 


940010 


01520 


440010 


01521 


601520 


81522 


707672 


01523 


740200 


01524 


740040 


01525 


200031 


01526 


542351 


01527 


741000 


01530 


740040 


01531 


202362 


01532 


n400lK> 


01533 


200030 


01534 


741200 


01535 


601541 


01536 


44001fci 


01537 


601533 


01540 


74004^ 



/SfcAWCh N HODt 
/tOAU ANO GO 



/*A1T Iron BUOCK 



/MAK€ « DATA C Mtjue 
/-511 

/I "ORO Short 2 blocxs 



/rtAlT FIRST 
/256 UATA BHAKS 



/NOW START UP IN SEARCH AGAIN 
/ANO TEST WRITE DATA CIODE 
/ 

UAC (il80ici 

DTLA 

O^M hCLOC 

LAC (tltRFNO 

OAC CAUOC 

LAC MCLOC 

SNA 

JMP .-2 

LAC (isaavj 

DTXA 

LAW -777 

DAC WCLOC 

LAC (8UPFER-1 

OAC CALOC 

LAC (-34000 

OAC 10 

LAC CALOC 

SAO (atJ^F«2-l 

JMP ,+4 

ISZ 10 

JMP ,-4 
THER65 HLT / 

/ 
/NOW TIME OUT 600 MICROSEC DTF SHOULD « 

LAN -310 

DAC 10 

ISZ 10 /WAIT 600 MIC8EC 

JMP .-1 

OTR8+10 /REAO STAf B 

5ZA /DTF SHOULD • 

TMER66 HLT /CMODE ANO WC • I INM DTF 

/ 

/ANY BREAKS MADE ST FINAL AND STATE CHECK 
LAC CALOC /GET CA 

SAD {8gFFR2-l /SHOULD NOT HAVE INCREKENTEO 
SKP /OK 

TMER67 HLT /EXTRA OB WRITE DATA CMOOfe 

/SHOULD MAOE NEXT 255 BREAKS 56 MILLISEC 

LAC (-34000 

DAC 10 

LAC WCLOC 

SNA 

JMP ,+4 

ISZ 10 

JMP ,-4 
TMER68 HLT 

.tJECT 



/WAIT FOR WC 
/K. GO TO 
/*C « Id 

/WAITED 56 MlLLSEC 
/NO 
/OIO NOT MAKE Enough bREAKS 



iGt 



TCBXP2 S«C 



(11941 
01642 
t«1543 
(^1544 
»1545 
B 1 5a€ 
01547 
»tl85P> 

01551 

fll532 

01593 

C15S4 

(91555 

I?1SS6 

01557 

01560 

01561 

01562 



01563 

P)1SjS4 

01565 

01566 

01567 

01570 

01571 

01572 



0»S7« 
01574 
01575 
01976 
01577 
01600 



H1601 

01602 

01603 

01604 

01605 

01606 

01607 

01610 

•*J611 

01612 

01613 



77732k? 

«400H^ 

44n0it^ 

fi01b43 
7ii»7572 
842326 

74020ti 
740(<4e< 

2(»0ii!30 

7402t!0 

74004V 

7,03302 

t02(?77 

777777 

455644 

770000 

740040 

600S23 



202355 

040010 
760030 

060010 

542356 
601573 
342346 
601566 



2«2M7 

705504 
402074 
740200 
740040 



703302 
202360 
707545 

601606 
601607 
601610 
601611 
601612 
740200 
74004Ct 



/"C ■ » QIO NCJl INH DF 



♦ MAlNyec-lS^-OATCA-* . MASCM 17, 19?;, • 

/NO*. MIT 9vi^ MIChOSEC *N0 OTF SHOOlD » 1 
LAW -460 * 

OAC 10 

liiZ i'i /«4IT 9BC1 hICifcC 

JMP ,-1 

OTh(B*10 /Ht40 STAr b 

LAC WCLOC 
SZA 

TMEH7(5 HLT 

caf 

JMS TYPIEX 
777777 

455644 
770000 

TMER71 HLT 

JMP TM0T5T 
ir°A°, cSS**"*" 30 TO 7? -ITH LA« .-S 

APIT8T LAC (27 

DAC 10 

LAM 30 
OAC* 18 

SAO CLAN 77 

jnP ,*i 

TAO (1 

...» •"^ /OIUKt NEXT 

^I^SL'^h!*? *'-'' '^'-AGS AND TUHN APJ On 
/«ONE OF THE CHANNELS SHOULD BREAK 

fjf /-.««., /CLEAR ALL FLASS 
LAC {400090 

Jzl ^ " "'TALL 4 CYCLES 

"t ^**^ SMOULO STILL » 

/NO. set^'lect e«ro« untrcWll\^,'T. ly' 

/TC02 SHOULD NOT API BREAK TO ADDRESS 4 J *^ 



/FOR 5TARI STORE IN 3ld 
/FIRST LAW 

/DONE TO LAST CHANNEL 
/TE5 
/LAN +1 
/STORE NEXT 



CAF 

LAC t7400 

DTLA 
CLA 

JMP .♦I 
JMP ,+1 
JMP ,♦! 
JMP ,*i 
JMP ,+1 
SZA 
HLT 
.EJECT 



/SHOULD TURN API OFF 

/ALSO Enable i 

/NlLL SET SELECT ERROR 

/API SHOULU NOT 
/OPtAK IT IS TURNED 
/OFF 

/API BREAK IN ERROR 
/UISPLAY FAILED CHA^JNEl. 
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t«iei4 


21^2357 


01615 


7(?55i,'4 


;()1616 


4i»2('7'J 


PI1617 


5423t>| 


(|>162«I 


741(^l«a 


f'lSZl 


74'MdAff 


01622 


7f7564 


I(!1623 


7tfi33B4 


01624 


4M]6l(> 


Ptl625 


542361 


(«1626 


741d«)it 


01627 


740040 


191640 


707594 


01631 


705514 


01632 


703304 


01633 


402074 


01634 


740200 


01639 


740040 


01636 


707594 


01637 


202362 


01640 


705504 


01641 


402074 


01642 


740200 


eil«43 


740040 


01644 


703304 


01649 


401641 


01646 


542361 


01647 


741000 


01690 


740040 


01691 


703302 


016S2 


707554 


01653 


2172363 


016!34 


7«55((14 


01659 


4020174 


P1696 


542361 


01657 


74HeiS 


(^1660 


740t*4e 



/NOl* TC/2 SMOULt) e«tAK TO AOOrtESS 44 
/WHfcN API IS rUHNtt) ON 

LAC C40B0iSa /TCd2 Sfc s 1 

ISA /StT Af-I tNAbufc 

XC1 LACll(< /^fAUL CVCLfcb Acl bKtAK 

SAO tUAC 44 /Tf ADUKtiS 44 

S^P /res OR Ii- AC 3 K no (iKEAk 

WLT /AFI NOI » </i hkONG AOD^feSS 

/iJ8K INSTRUCTION SHOUtO AULO* 2N0 &«EaK 

/SE STILL » 1 AND API STILL fcNABLtO 
DTXA*10 



DbK 
XCT 



/CLtAK p«ioi*iTr Acrive 

/ShOULU ALLOW 2nO akEAh APTtf* b CrCufS 

/WIGHT AOORESS 

/YfcS, yKOUE TO 44 

/AC « NU 8NEAK OThtW w«(jNtt 



SAO (LAW 44 

SkP 

MLT 
/NOW TUHN API OFF 
/THEN DUK SHOUtO NOT ALLOk a BKEAR 

nrxA+ia 

ISA+10 /CLEAH A^JI EMaSLE 

WUK /CLEAW OECTaPE PR ACT 

XCT LACI0 

SZ* /AC SHOULD STILL » NO BKEAK 

HUT /API aiO NOT TURN OFF 

/SET A HIGHER PRIORITY ACTIVE 

/ANO tNABUE API SHOULD NOT 8REAK 

DTXA4>10 

LAC C400200 /SET PR0 ACTIVE API ON 

ISA /oc IT 

XCT LACI0 

SZA /SHOULD NOT ALLOU BREAK 

HUT /0 ACTIV€ YET API BROKt 
/NO»r DBK SHOULD ALLOW TC02 BREAK 

/CLEAR PRa ACTIVE THEN BREAKS 

DBK /CLEAR PR0 ACTIVE 

XCT ,-4 /STALL S CYCLES SHOULD TEN API 

SAO (LAW 44 /IF AC » NO BREAK 

5KP /AC ■ LAW 44 IS OK 

o™„«o *^^^ -"^^ ^°T ■* *'^D NOT LAW 44 OTHER CHAN 

/PROGRAM LEVEL REQUESTS SHOULD NOT INTERFERE WITH OECTAPE 
CAF 

/WILL CAUSE SELECT ERROS 

/TC Turn apj anu 4 PROG. RtO On 

/ENAHLfe 



DTXA+ia 

LAC (40^1400 

ISA 

XCT LAC10 

SAO (LAM 44 

SKP 

HLT 

.EJECT 



/STALL 4 CYCLES AMD API BSEaK 
/GET TO 44 ONLY 
/YfcS 
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01661 


7t»3Jk'? 


01662 


7'/7S^<^ 


01663 


4i!?H7« 


t«l664 


2*1236/ 


P1665 


79bbVA 


1X1666 


705514 


01667 


402^974 


01670 


74020k» 


01671 


74004k^ 



/TUKN API On THfcN OPF 

/SHOULD K!OT ALLOW TCag TO BHEAK 

/ 

CAC 

D T X A ♦ 1 « 

xcr LACivi) 

LAC (4000^0 

ISA 

Ii»Atl0 

XlT LAC10 
S2A 

Mtr 



/CLtAR API c'^-A^Jte 
/ANO OtCTAPfe ACUVfe 
/rtAiT FQk it; 

/rURN API ON 
/TUHN n UFF 



/SHOULD NOT HAVt bt^OKiN. 
/eftfcAK AFTER API OFF 



0l«72 


2023S7 


01673 


705504 


01674 


402074 


01675 


942361 


01676 


741000 


01677 


740040 


0170« 


707594 


01701 


4.02074 


01702 


703304 


01703 


705514 


01704 


402074 


01709 


740200 


01706 


740040 



01707 


202397 


01710 


705504 


01711 


402074 


01712 


542361 


01713 


741000 


01714 


740040 



/ALSO DBK FOLLOKEO BV API OFF 

/SHOULD NUT ALLOW A BREAK BUT LAST API OFF 

/SHOULD NOT LOOSE SE INTEHRUPT 

/ 



LAC (400000 

ISA 

XCT LACI0 

SAO (LAW 44 

SUP 

HLT 

DTXA-»10 

XCT LACI0 

DBK 

ISA4-t0 

XCT tACI0 

S2A 

MLT 



/6NABLt API 

/SHOULD NOP THEN BREAK 

/API DID NOT LOOSE 5E 
/API ON API OFF CLRO SE 



/CLEAR OECTAPE ACTIVE 
/TURN API OFF 

/SHOULD NOT ALLOW BREAK 

/BREAK AFTER API OFF 



/OBK POLLOWEO BY API OFF SMOUUO 

/NOT HAVE LOST THE SELECT ERROR INTERRUPT 

/ 

LAC (400000 

ISA 

XCT LACI0 

SAO (LAM 44 

5KP 

HLT 

.EJECT 



/LAST ISA 10 LOST AN ACTIVE INTERRUPT 
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»171S 
Pil7l6 
1^1717 

^1721 
'/1 1 722 
«1723 
»1724 
?1725 
K1726 
I!!1727 
*tl7JB 
K1731 
017J2 
^11733 

01735 
01736 
PI1737 
01740 
01741 
»1742 



TCHkfB 8»<C 



2v«?3fc.4 

nt4P!VlH<? 
7fc.34R? 

7<H>b9'4 

99Z36V 

7C764& 

4»?e74 

!5K)l73«i 

6(>l73l 

6ttl732 

6M1733 

601734 

8(?17a5 

542361 

74100t« 

740040 

2««0000 

740200 

740040 



01743 


202365 


01744 


040002 


01745 


703304 


01746 


402016 


01747 


S017S0 


«»1750 


S01751 


01731 


542361 


01752 


741000 


01753 


740040 


01754 


200e0ti 


01755 


740200 


01756 


740040 


01757 


700002 


01760 


760044 


01761 


040044 


01762 


202302 


01763 


QI40001 



• «4lN0£C-i5-DATCA-* • MArtCH 17, i972 • 

/API SHOULD OVEkRIOE PKUGKAM iNTEKRuPT 
/ 



♦ lid 



C40ifl»0tl 
(7400 



LiC 
OAC 
CAF 

lu/v 
LAC 
ISA 

L«C 
DTLA 

iltr LACI0 

.tl 
,*s 
.♦I 
.♦1 
.♦I 

(CAW 



JMP 

jnP 

JMP 
JMP 
JMP 
SAD 
SKP 
HLT 
UAC 
5ZA 
HUT 



44 



/t^Ae»Lt PI 

/£NA6Lfc API 

/CAUSfc A itLECI fePROR 

/WAIT 

/f-OK PI OK 4PI 

/SHOULD ONLY SET 
/THe API BPEAK 
/AKO NOT THE PI 

/API OK 

/VES 

/API DID NOT BREAK 

/SHOULU STILL ee 

/OIO PI OCCOK 

/TES API OIO NOT INM PI 



/OBK ShOULO NOT ALLOU 2N0 BREAK FKOM SAME FLAG 
/AND PIE SHOULO NOT OCCUR AORS STILL ■ 
/ 



LAC (.^b 
OAC 2 

oaK 

XCT SFtCHL0 

JMP .fl 

JMP ,+1 

SAD (LAM 44 

SKP 

HLT 

LAC 

S2A 

HLT 

lOF 

LAtf 44 

OAC 44 

LAC (JMP* 2) 

OAC 1 



/OBK 

/STALL 5 CYCLES 
/SHOULD NOT PIE SHOULO APE 
/SELECT ERROR MAS ALREADY 
/BEEN SERVICEO 3HD BE 
/SERVICED T.IICE 

/API BROKE 

/PROGRAM INTERRUPT i»ENT TO t) 



/RtSTOKE 44 TO LAW , 
/RESTORE I FOR n£xT 
/INTERRUPT 



•EJECT 
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/5T4TUS A BIT 9 ■ a 


SE » 1 








/SMOUuD NOr ALLOW API 

i 


BREAK 




C<1764 


7iS33«2 


/ 


CAF 






K1765 


2i??.^t)7 




LAC C4<1»1trtM« 






01766 


7f»53P« 




Is* 






01767 


aaSSlfr" 




LAC (7rt0tJ 


/bfc AGAIN ONLlf '-lO- 


■tKI 


01770 


7?7S45 




DTLA 


/CAUSE se 




01771 


462^74 




XCT LACIiri 






01772 


6PJ77.J 




JMP .♦I 


/-(AIT SHOULD NOr API 




01773 


601774 




JMP .♦! 






01774 


6B1775 




JMP ,+1 






01775 


60l77fi 




JMP .+1 






01776 


740208 




SZA 


/DID API dSEAK 




01777 


740040 




HLT 


/API BKOKt NOT or eM 




02000 


703302 




CAF 






02001 


102260 




JM5 REWORV 


/PUT 0«1VE IN EZ 




02«02 


202366 




LAC (SKCHFM^-ENAtiLl 




02003 


34fl231 




TAO UNFUNC 






02404 


70754S 




DTLA 


/SEARCH FORWARD GO 




02005 


2HfZ323 




LAC CBLKFNO 






02a«« 


«MM031 




O.AC CALOC 


/SET UP CA 




02«fl7 


MTS72 




OTRB+10 






02010 


741100 




SNA 


/WAIT FOR OTF 




020 11 


««2««7 




J«P .-2 






02012 


7^4 1 100 




SPA 


/ERROR STATUS 




02013 


002002 




JHP ,-ll 


/OO IT AGAIN 




02014 


202a57 




LAC (400000 






02015 


705504 




ISA 


/ENABLE API 




02016 


402074 


SNCHL0 


XCT LAC10 






02017 


942361 




SAO (LAM 44 


/OlD BREAK OCCUR TO 44 




02020 


741000 




SKP 


/YES API ON DTF 




02021 


7^10040 




HLT 
•eJECT 
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TCHXP? 
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/NOW ! 


START SEARCH FOR" 


akO with API ON 






/wHtN 


StAHCH 0A1A 8K€AKS SHOULD AKI 






/ALSO 

/ 


USE CLOCK INTEHKJPT fm TIMER 


P2*»22 


7^3,iv£ 


CAK 




H2«2d 


2^/2.^1 




LAC UnFunC 




(«2024 


342dtie 




TAt) Ci>«CHF»«*EN4aLI 


02025 


7li^7^4^ 




DTLA 




02026 


777324 




LAI .454 


/5 SeCO+<U CLOCK 


H2027 


n4^«97 




UAC 7 


/JUST IN CASE HANGS 


02030 


14*0»i5 




Din e 




f29il 


70101944 




CLON 




02032 


2e?3«7 




LAC (.+12 




02033 


<»4ee«2 




OAC 2 




02034 


2Ba357 




LAC itmntd^a 




02035 


7055iil4 




ISA 




02036 


700042 




lUN 




02037 


750000 




CLA 




02040 


741200 




SNA 




02041 


602040 




JHP ,-1 




02042 


700004 




CLOF 




02043 


700002 




lOF 




02044 


542361 




SAD CLAW 44 


/DID API FOR OECTaPE 


02045 


741000 




5KP 


/TES OT B«EAK OK 


02046 


740040 




MtT 




02047 


200000 




LAC 




02030 


740200 




SZA 


/DID PI OCCUR 


02051 


740040 




HLT 


/PI IN ERROR 


02052 


206377 




LAC BLKFND 


/MAS SEARCH 


02053 


741200 




SNA 


/OATA BREAK MADE 


02054 


740040 




HLT 


/SEARCH DID NOT 06 


02055 


703302 




CAP 




02056 


102077 




JMS TYPTEX 




02057 


777777 




LAW .1 




02060 


416051 




416051 


/API 


02061 


004556 




4556 


/ EN 


02062 


447700 




447700 


/O EOM 


02063 


750004 




LAS 




02064 


502315 




AND (1000 




02065 


741200 




SNA 




02066 


740040 




HLT 




02067 


601563 




JMP APITST 




02070 


402071 


XCTXCT 


XCT ,♦! 


/5C THAT 


02071 


4«2072 




XCT .+1 


/PkUGRAH WILL STALL 


02072 


402016 




XCT SRCHL0 


/FOR 7 CYCLES 


02073 


777777 


exiFLG 


LAW -1 
•EJECT 


/MADE B Bf 02m in 1 



TVGt 



TCBXH2 SRC 
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921/174 222075 
«2B75 i?02?76 
H2076 ,Jii>C(fi,»^ 



UACI0 LAC* .tl 

n 
/TYPfc TfeXr KOuTJNit 
/f^ASSAGt PACKtQ 6 SIT COOtS 
/ASCII -24i4 STOHEu aFIEH Jmj, 
mim I)> CAi< KfeT LIHE FttO 
/77 CHAK IS EOM 



/LAC I NfexT AiJOKSbS 
/WHICH POINiTS AT NEXT 
/"hlCH CONTAINS ZtrtOb 



02077 


fi(»2B77 


TYPTEX JMP , 


021IJ0 


222077 


LAC* TYPTEX 


FI2101 


442»(<77 


ISZ TYPTEX 


192102 


«42162 


DAC TYPSAV 


i)21l«3 


740if!tll 


CMA 


02104 


74ei2itv) 


SZA 


02105 


60211? 


JMP .+3 


02106 


102292 


JNS TYCKLF 


02107 


602100 


JMP TYPTEX+1 


02110 


740001 


CMA 


02111 


742020 


RTR 


02112 


742020 


RTR 


02113 


742020 


RTR 


02114 


042163 


DAC TYPSAV+l 


02115 


742020 


RTR 


02116 


742020 


RTR 


02117 


742020 


RTR 


02120 


102136 


JMS TYPCHR 


02121 


202163 


LAC TYPSAV+i 


02122 


102136 


JMS TYPCHR 


02123 


202162 


LAC TYPSAV 


02124 


102136 


JMS TYPCHR 


02125 


602100 


JMP TYPTEX+1 
/STOP ON ERROR IF DELETE S>»« 


02126 


602126 


ERRHLT JMP , 


02127 


790004 


LAS 


02130 


502370 


AND (600000 


02131 


740200 


SZ4 


02132 


622126 


JMP* ERRHLT 


02133 


202126 


LAC ERRMLT 


02134 


740040 


MLT 


02135 


622126 


JMP* ERRHLT 


02136 


602136 


TYPCHR JMP , 


02137 


502371 


AND (77 


02140 


542371 


SAO (77 


02141 


622077 


JMP* TYPTEX 


02142 


342372 


TAO (240 


02143 


102145 


JMS TYPCHA 


02144 


622136 


JMP* TYPCHR 
.EJECT 



NOT SET 
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TCBXP? 


SKC • 


H*IN0ec-l5-D4TC 


#«2145 


eViplAi 


TYHCMA 


JMP , 


«t2i46 


PI4216S 




OAC SAVCha 


P2147 


7b9V:ii6 




LAS 


(*2l3i^ 


741iHB 




SPA 


02151 


622145 




JMP* TVPCmA 


l»2li2 


2^2161 




LAC SAVCHA 


(*2t33 


7WB4ne 




TLS 


e*2t54 


7f{i4ei 




TSF 


«I215S 


6«i2l54 




J«p .-I 


02156 


7004(12 




TCf 


021S7 


62?145 




JMP* TYPChA 


«l216»t 


i400et0«i 


DLV 


a 


02161 


010000^ 


SAVCHA 





«I2162 


00000»1 


TYPSAV 


w 


«t2163 


(f00«00 







02164 


«000e» 




VI 


02165 


0«00«0 







02166 


000000 











/TYPE ( 


:ONTENTS OF THE 






/AC IN 


OCTAL 


02167 


602167 


TYPCON 


JMP . 


812170 


102220 




JMS OECONT 


B2171 


102241 




JMS TYPOCT 


02172 


202166 




LAC TYP8AV+4 


02173 


102241 




JMS TYPOCT 


02174 


20216S 




LAC TYP8AV+3 


0217S 


102241 




JMS TYPOCT 


02176 


202164 




LAC TYPSAV+2 


B2177 


102241 




JMS TYPOCT 


02200 


202163 




LAC TYPSAV+1 


02201 


102241 




JMS TYPOCT 


02202 


202162 




LAC TYPSAV 


02203 


102241 




JMS TYPOCT 


02204 


102246 




JMS SPACE2 


02205 


622167 




JMP* TYPCON 






/TYPE OUT LOWEST 3 CHAI 






/IN OCTAL 


02206 


602206 


TYPC03 


JMP , 


02207 


102220 




JMS OECONT 


02210 


202164 




LAC TYPSAV+2 


02211 


102241 




JMS TYPOCT 


02212 


202163 




LAC TYPSAV+l 


02213 


102241 




JMS TYPOCT 


02214 


202162 




LaC TYPSAV 


02215 


102241 




JMS TYPOCT 


02216 


1^2246 




JMS SPACE2 


02217 


622206 




JMP* TYPC03 
.EJECT 
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'^RGE 



C12221 
02222 
92229 
fi2224 

02226 
02227 
02230 
02231 
02232 
02233 
02234 

Visas 

02236 

02237 

02240 

02241 

02242 

02243 

02244 

0224S 

02246 

02247 

02250 

02291 

022S2 

02293 

022S4 

022SS 

02296 

02297 

022St 
02261 

022S2 

02263 

02264 

02269 

02266 

02267 

02270 

02271 

02272 

02273 

^2274 

C2275 

02276 

02277 



743H8iA 
74«n2n 
«4216i 

?4m2» 

042164 
742t52» 

740e2» 

a4216& 

7421920 

7 4002 1(1 

8142166 

74202tt 

740020 

622220 

S02241 

502373 

342374 

102145 

S22241 

6M246 

102077 

08«t77 

622246 

802192 

2ff2379 

102149 

202376 

102149 

822292 
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02300 
02301 
02302 



909et0 
202316 

340231 

707S45 

707972 

7412D0 

602264 

707962 

542321 

741000 

740040 

700314 

5023*3 

740200 

622260 

602272 

000000 

000003 

620211 

620002 



OtCONT JMP , 

DAC TVPSAV 

RTW 

fiAR 

fiAC TVPSAV*! 

RtM 

OAC TYPSAV+2 
RTK 
HAH 

OAC TYPSAV*3 
RTK 
RAK 

OAC TYPSAV4-4 
RTK 
RAR 

JmP* OECOnT 
TYPOCT JHP , 
AMD C7 
TAO (260 
JliS TYPCHA 
JMP* TYPOCT 
SPACE2 JMP . 

J»S TYPTEX 
77 

JMP* SPACE2 
TrCRLF JMP , 

LAC (215 
JHS TYPCMA 
LAC (212 

JMS TYPCMA 

J*»P* TYC«LF 

DRIVE TO REVERSE EhOZONE 



/REMlttD 

REMDRV 





LAC (©0BIT+01R81T 

TAD UNFUNC 

DTLA 

DTRB4'10 

SNA 

J«P .-2 

0TR8 

SAU (900000 

SKP 

XX 

lORS 

AND (200 

SiA 

JMP* REhDRV 

JMP ,-5 

.tND 



/MOVE TAPE BKmD 
/WAIT roR ruAGS 



/CAN ONLY BE EN020NE 
/OK 



/ERROR 



/ERROR FLAG'/ 
/TtS 

/ixO 



*L 

♦ L 
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TCBXP? S«C 


323(^3 


a6i(?i200 




f*23t)4 


6fl(?262 




P23ia5 


iAVI^A?ik!l 




«f23i«6 


;?25ieK0 




t<23a7 


7S74|?'.('! 




}>2310 


■»i!i7tfi9>f, 




P2311 


4Ami/>V< 




82312 


setdAA? 




P2313 


XZ74UH6 




il23l4 


600511 




ftaSiS 


oitdiestte 




02316 


n600«0 




«!2317 


1^064(1)0 




«»232« 


777746 




e2321 


500000 




02322 


^45400 




i*2323 


H06377 




02324 


7230«0 




02325 


500100 




f)2326 


0HiH100 




82327 


600704 




02930 


000500 




02331 


600717 




02332 


023000 




02333 


696000 




02934 


410100 




02335 


410000 




02336 


093000 




02337 


021000 




02940 


172366 




02341 


010000 




02942 


754960 


•L 


02949 


019000 


•1, 


02944 


777977 


• L 


02945 


777400 


• L 


02946 


000001 


♦I, 


02947 


^57777 


•U 


02950 


756700 


•L 


02351 


006777 


• L 


02952 


744000 


• L 


023S3 


005000 


tt 


02354 


015000 


•I. 


02355 


000027 


• L 


02956 


760077 


•t 


02357 


40*1000 


*L 


02960 


00740H 


*L 


02961 


760044 


♦ L 


02362 


400200 


• (, 


(12363 


400400 


*L 


02364 


0«1726 


*L 


02365 


«01751 


*L 


02366 


02140(4 


*L 


023S7 


5102044 


*L 
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PaGJ 



!^7 


TCUXPi> 


SKC 


0237(9 


nvfmiii» 




02371 


^9^97; 




02372 


nvi 1^240 




02373 


f^ifVUfiVl? 




P2374 


!»K»e»2fii!l 




02375 


ifVtfiZii 




02376 


«m»2i2 






sizt 


■a2377 
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